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SEQ 1 



4 

S 
6 
7 
8 
9 
10 
11 
12 
13 
14 
IS 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
SO 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 

4;: 

43 
44 
45 
46 
47 
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PRODUCT CODE 
PRODUCT NAME 
PRC^UCT DATE 
riAINTAINER: 
AUTHOR : 



lOLNTIFICATlCN 

AC - FG158 - MC 

CZTU2B0 TU81 FRONT lK'O FUNC TEST 
09 - OCT - 1985 

TAPE AND OPTICAL DIAGNOjriC ENGINEERING 
RAYMOND CHANG 



THE irrORMATION IN THIS DOCUM£NT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 

NO RESPONSIBILITY IS ASSU»*EO FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 

COPfRIGHT (C) 1985.1985 BY OlblTAL EQUIPMENT CORPORATION 
THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION: 

MASSBUS 



DIGITAL 
DEC 



POP 
OECUS 



UNIBUS 
DECTAPE 
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49 REVISION HISTORY 

50 
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52 
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54 1 GENERAL INFORMATION 

56 1.1 Product O«*cription 

58 Th« TUai Functional Diagnostic is intended to provide 

59 confidence in the basic functionality of the TU01 subsystem. As stich. 

60 this should be the first host level diagnostic run on the TU81 

61 sub«yste« to verify installation, or for troubleshooting. Throughout 

62 the prograa, enphasis is placed on isolating faults to the Field 
65 Replaceable Unit (FRU). 

64 

65 The progran runs in standalone mode in conjunction Mith the 

66 PDP-11 family Diagnostic Supervisor. In addition to host level 

67 testing, the program Mill implicitly invoke the TUSl's controller 

68 resident Level 1 self-test m i crod i agnost i cs as mcII as explicitly 

69 invoking the controller's Level 2 m i crod i agnost i cs . 
70 

71 
72 

73 1-2 Product Users And Uses 
74 

75 

76 1. OMT testing 

78 2. As appropriate at various manufacturing facilities 

79 

80 3. Field service personnel 

«1 ... 

82 4. DEC customers Mho choose to provide their oMn ma intai nance 

83 
84 
8S 
86 

87 1.3 Performance Goals 
88 

89 This program Mill test up to four TUSl's in a sequential 

90 manner. To run a full pass of the program, a scratch tape must be 

91 mounted on the transport and an operator must be present to perform 

92 manual intervention. HoMOver, appropriate subsets of the program can 

93 be run if there is no scratch tape, or the operator inhibits manual 

94 intervention tests. Furthermore, the first pass of the program Mill 

95 run in "quick verify" mode: i.e., a single iteration of each test Mill 

96 be performed. If multiple passes arc specified by the operator, the 

97 second and all subsequent passes Mill run Mith each test executed with 

98 multiple iterations. First pass execution time Mill be approximately 

99 20 minutes Mhile second pass execution time Mill be approximately 24 
100 minutes. These pass times are based on a single unit under test. 

101 

102 1.4 Pass/Fail Criteria 
lOS 

104 This program employs a bottom-up approach to testing the TU81; 

105 that is. Test 1 Mill attempt to verify the simplest level of 

106 host -to -controller communication as outlined in UQSSP. Each 

107 subsequent test builds upon the functionality already verified in 
106 previous tests. Hence, most errors encountered by the program Mill be 

109 considered as fatal device errors and the failing unit Mill be dropped 

110 from the rest of the test sequence. 
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111 
112 
113 

114 1.5 Fallsoft Goals 

111 Unit specific problcMS Mill be handled by the prooraw. CPU 

Xi7 faults (i.e.. illeaal traps or interrupts) Mill be handled by the 

118 Diaonostic Supervisor. SysteM faults m!11 be handled by the 

119 Diagnostic Supervisor, fault dependent. 

120 
121 
122 

123 1-6 Restrictions 

lis Although basic read/Mr ite testing is performed, this program 

126 is not interested in measuring the subsystem's data reliability. 

127 While recoverable data errors Mill be reported by the program, no 

128 atteupt Mill be made to determine the subsystem's compliance Mith 

129 error rates. Unrecoverable data errors Mill be considered as fatal 

130 device errors, although the media could be the causative factor. 
131 

132 
13S 

134 1.7 Non-Goals 

13S 

136 This program is intended to verify the gross functionality of 

137 host-to-controller communications. the integrity of the controller 

138 hardMare, controller-to-drive communication and the basic 

139 functionality of the drive. It is not intended as a verification of 

140 TnSCP protocol as implemented in the controller firmMsre. and no 

141 testing of TMSCP commands is provided. 



142 
143 



145 1.8 Runtime Environment Requirements 
146 

147 Runtime environment requirements include: 
146 

149 1. XXOP* Diagnostic Supervisor 

ill 2. PW»-11 family CPU 

ill 3. 28 KW memory 

1S4 

tSS 4. Console Terminal 

157 5. Load Device 

156 

159 6. 1 to 4 TU81 tape drives Mith controllers 

160 

161 7. 1 to 4 TU81 scratch tapes (optional) 

162 

163 8. LCP-S UFO softMsre (optional) 

164 
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166 2 USED ZMTERFACE 

167 

168 2.1 Umc Dialogue 

169 

170 Th« folloMing uMr dialogue Mill b* provided at proflraw 

171 atart-t'iMC to allOM the user to establish certain operational 

172 paroMtars of the pregra«. 

173 
174 

175 

176 2.1.1 HardMare Questions - 

177 

170 This set of questions aust be ansMored Mhen the prograw is 

179 first started. 

IftO 

101 CHANGE HARDWARE (L)7 no oefault 

1 8? 

16S NUMBER 0^ UNITS (0)? enter number from 1-4 

1«4 UNIT X 

185 BASE ADDRESS iO) 7745007 

186 VECTOR CO) 2607 
107 UNIT NUMBER (0)7 
188 

189 
190 

191 2.1.2 Definition Of Hardware Questions - 

192 

193 CHANGE HARDWARE - This question merely Msnts to knot* if you want to 

194 reconfigure the units under test. It must be ansMrad "yes" on the 

195 first pass of the program. 
196 

197 hWHBER OF UNITS - Enter the number of TU8l's to be tested. 

198 

199 BASE ADDRESS - Enter the 10 address of the unit to be tested. 

200 

201 VECTOR > Enter the vector location to be used for the unit. 

202 

203 UNIT WjnBER - Enter the MSCP-spcc i f icd unit number for the unit. 

204 

209 This entire set of questions Mill be repeated up to four times, 
206 depending on the user's response to the "number of units" question. 

207 
208 
209 

210 2.1.S SoftMsr-c Questions - 

211 

212 Most of the optional functionality of the program is either 

2lS handled automatically by the program or through established procedures 

214 provided by the Diagnostic Supervisor hence there are no softMsre 

21^ queations. 
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217 3 EimOft REPORTS 

21$ 

219 Error r«ports Mill H«v« tMO basic forwats •« d*«crib*d baloM. 

220 It is anticipatatf tr»at. due to prograa partitioning, it Mill ba 

221 possible to unaatoiguously daf tna a singla FRU as tHa cauaa of any 

»rror condition. 



224 

?it> 3.1 Error Forawt 1 

227 

220 This basic foraat Mil] be used by all Kost laval tasting. 

229 

250 CZTU2 •rror on unit 11 test tti sub sss PC: xxxxxx 

231 SA CONTENTS IN ERROR 

232 INIT SEOUENCc STEP n 

233 SA RE: MHMMMM EXPCTO: yyyyyy ACTUAL SA: zzzzzz 
234 

23S •••♦FAILING FRU: LESI/CONTROLLER/CABLE***» 

236 

nil In this axaaplc. tha f ialds have tha folloMing naanings: 

236 

239 

240 ■ discrata arror nuabar as darinad by progran 

242 > 11 ■ logical unit numbar assigned to un<t-in-arror during 

243 hardMore quaations 
244 

245 * ttt " test number during t^ich error occurred 

246 

24 7 - sas ■ subtest number 

24a 

249 - xKxxKx •• program location of error call 

250 

S^l • n * step numbar of tha UOSSP initialization aaquenee Mhich 

252 detected tha error condition 

2SS 

254 - MMMMMM ■ phyeical address of the SA register 

255 

25( yyyyyy ' expected contents of SA register for this step 

257 

258 - zzzzzz * actual SA regiater contents 
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260 S-2 Error ft 

Iti foTMt will b* uwtd for errors 4ct«ct«<l by tt»o Lovol 

263 oicrotfiosnootics. 

96% CZTU2 OVC PTL orror on unit 11 tost ttt oub SSS PC: xxkxxx 

266 XlfTEMNML DRIVE TEST FAILED 

267 

26* fMJLt CODE: ff SUB-F/WLT CODE: cc 

2 70 REFER TO PATHFIMOER FOR EXPtANRTION OF CODES. 

272 •***FAILINC FRU: DRIVE**** 

27S In this oxaoplo. tho f Soltfs have the folIOMina ooonmas: 

279 - ooooo ■ ooo obovo 

290 - 11 ■ SCO obovo 



ttt " ooo obovo 

29} 

J 4 - ••• ■ s«« obovo 

5 

296 - KKxxKx ■ soc obovo 

297 

299 - ff " rofor to pothfindor 

2^0 * <^c ■ rofor to psthfindor 
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* rUNCTXONM. OeSOJIPTION 

T*m follpHina *««t description* dl »»«v« certain points in 
r Bimmo - All orrors opocif lod b*lo« Mill cawoo tho tf\it to b« dropp ed 
fr«« tHo toot. «^l««o opocifically netod to eontrarw. 
r«/rtf«or«or«. if tt«o operator has n loop-on-orror CLOE flag aot) 

oeop* loop* Mfll return to ttte beginning of tbe test containing tt>e 
failwre. Exceptions to tttis Mill alao be noted explicitly below. To 
understand ttte nor«al four step initialization sequence, refer to the 
UOSSPi ttte descriptions of tests that use this seduence Mill only 
h;ghlt#«t unique features utilized by that specific test. 



4.2 TEST 1 < Existence Verfication Test > - 

TEST OESCRIPTZON: 

This test verifies the TUBl IP and SA reoisters can 
be accessed on the unibus through the UBA. 

TEST STEPS t 

BQITEST 

Znitisltze the Unibus 
If srror on initislize 

THEN Print Systea error and ABORT program 
Clear UBA status 
IF error on Clear status 

THEN Print System error end ABORT program 
Read the IP r«giater 

Uait 100 •icpooaeends for possible Ur.ibus timeout 

Read UBA atatus 

IF iMibus timeout error 

THEN Print Fatal device error and drop unit 
IF any UBA error 

THEN Print Fatal device error mn-J ABORT program 
Read the SA register 

Wait 100 aicroseeend* for possible Unibus timeout 
Read UBA status 
IF any UBA error 

THEN Print Fatal device error and ABORT program 

ENOTEST 



DEBUG: 

The FRU is the Cesi Adapter for all errors in this teet 



No error looping is alloMsd ell errors abort the test or program 
I Cesi 



t 
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341 4.2 TEST 2 < Initialization T«st > - 

342 

343 TEST DESCRIPTION: 

544 

345 This taat will do a ru81 controller hard initialize 

346 to cauaa the roa resident potter up diagnoatica 

347 in the tu61 to be run. 
348 

349 TEST STEPS: 

350 

351 BGNTEST 

352 Call dup ipinit to ttrite to the Ip reaiater to beam 

353 Hard initialize and wait for STEP 1. 

354 IF the TUfll faila to enter STEP 1 

355 THEN print fatal device error and drop unit 

356 CoMpare atep 1 data expd m ! th recv 

357 IF data coapare error 

358 THEN print fatal device error and drop v^it 

359 ENDTEST 
360 

361 

362 DEBUG: 
363 

364 If loop on error specified then loop to start of test. 

365 The FRL< is the Lesi Adapter for all errors in this teat. 
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367 4.3 TEST 3 < Initialization Test > - 
368 

369 TEST DESCRIPTION: 

3"'0 

371 This test will do a TU81 controller hard initialize 

372 then do initialization steps 1 through 3. 

373 It Mill wait for step 4 to be entered but no step 4 

374 testing Mill be done in this test. 
375 

376 TEST STEPS: 

377 

378 BGNTEST 

379 Call dup ipinit to Mrite to the Ip register to begin 
300 hard initialize and Msit for STEP 1. 

381 IF the TU81 fails to enter STEP 1 

302 THEN print fatal device error and drop unit 

383 Coapare step 1 data expd Mith recv 

304 IF data coapare error 

38S THEN print fatal device error and drop unit 

307 Call dup stepl to Mrite step 1 bit pattern and Mait step 2 

300 IF the TU81 fails to enter STEP 2 

309 THEN print fatal device error and drop unit 

390 Coapare step 2 data cxr/d Mith recv 

391 IF data coapare error 

392 THEN print fatal device error and drop unit 
393 

394 Call dup_,step2 to Mrite step 2 bit pattern and Mait step 3 

395 IF the TuSl fails to enter STEP 3 

396 THEN print fatal device error and drop unit 

397 Coapare step 3 data expd Mith recv 

398 IF data coapare error 

399 THEN print fatal device error and drop unit 
400 

401 Call dup step3 to Mrite step 3 bit pattern and Mait step 4 

402 IF the TU81 fails to enter STEP 4 

403 THEN print fatal device error and drop unit 

404 Coapare step 4 data expd Mith recv 

405 IF data coapare error 

406 THEN print fatal device error and drop unit 

407 ENOTEST 
408 

409 

410 DEBUG: 
411 

^12 I^ loop on error specified then loop to start of test. 

413 The FR(l is the Lesi Adapter for all errors in this test. 
414 
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416 *•* TEST 4 < SA Register Wrap Teat > - 

418 TEST OeSCRIPTION: 

419 

420 The TU81 Mill be initialized in diagrvoattc Mrap node 

421 and then a one CI) bit Mill be floated through the 

422 SA register to see that it echoes properly. 

423 The process Mill be repeated to float a zero CO) 

424 through the SA register. 
425 

426 TEST STEPS: 

427 

426 BGNTEST 

429 Call dup ipinit to Mrite to the Ip register to ^gir. 

430 hard initialize and Mail for STEP 1. 

431 IF the TU81 fails to enter STEP 1 

432 THEN print fatal device error and drop unit 

433 Call dup step 1 to set diagnostic Mrap node 

434 REPEAT for all data in FLOAT__table 

435 Write data pattern into SA register 

436 Start a 10 aecond tiaer 

437 Read SA register until the read pattern equals the 

438 Mrite pattern or 10 second tiaer times out. 

439 IF 10 second tiaer expired 

440 THEN Print Fatal device error and drop unit 

441 END -REPEAT 

442 Call dup ipinit to Mrite to the Ip register to begin 

443 hard initialize and Mait for STEP 1. 

444 IF the TUSl fails ro enter STEP 1 

443 THEN print fatal device error and drop unit 
446 ENOTEST 

448 FLOAT_.table: 

449 FLOATING I'S 1.2.4.10.20.40.100.200.400.1000.2000 

430 4000.10000.20000.40000.100000 

431 FLOATING O'S Floating I's co«ple*ented 
432 

433 DEBUG: 
434 

433 If loop on error specified then loop on failing Mrite and read. 

458 The FRU is the Lesi Adapter and tu81 controller 

457 for all errors in this test. 
438 
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461 4.5 TEST 5 < V«ctor And BR L*w«I Test > • 

463 TEST OESOtVTION: 

465 Th« TU81 Mill tM initial iz»d with mtarruot anabl* 

466 Mt to verify that Mm T\J81 intarrvipt* to ttt« 

467 corract vactor and Bft laval. 

466 Thia taat ia only rt«> on tha f irat paaa. 
469 

470 TEST STEPS I 
471 

472 aCNTEST 

47S Call A4p ipinit to ttrita to tKa I» ragiatar to baftin 

474 Hard initializa and m»lt for STEP 1. 

475 IF tha TUBl failo to antar STEP 1 

476 THEN Print fatal tfavica mrtw and droo «<nit 
477 

47f Sat IPL to hia^at priority to lock out intarruota 

47* Claar UBA atatua 

4|0 V mrr^r on Claar atatua 

4ii THEN Print Syataa arror and ABORT prograa 

4i| Enabla UBA intarrupta 

4tS IF mrror on anabla uba intarrtj^ta 

494 TMEN Print Syataa •rr^ and ABORT prograa 

419 

4i# Call *»^.atap,^l to aat intarrupt anabla 

4i7 IF thaTOil faTIa to antar S^EP 2 

THEN Print Fatal ^vica •rr^r and drop unit 
CA tuBl atM 2 intarr^^t ahould ba panding har«) 
Lewar tha IPL until intarrupt oeeura or laval aquala XIO (loMoat) 
IF no TuBl intarrupt oeeurrad 

492 JHEH Print Fatal daviea mrror and drop unit 

491 IF any arr^- datac^ad in intarrupt aarvica 

494 WEH Print Fatal ayatam arror and ABORT taat 

495 IF tha intarrupt oeeurrad at tha wrong vactor 

496 THEN Print Fatal davica arror and drop unit 

497 IF tha intarrupt oeeurrad at tho wrong BR laval 

THEN Print Fatal daviea mrr^r and drop unit 



IOiMbla UBA intarrupta 
ZF frpr on DiMbla uba inter rupta 
THEN Print Syataa mrror and ABORT prograa 
Call dup._ipinit to write to tha Ip ragiatar to begin 
fiiard initialixa and wit for STEP 1. 
IF tha TiMl faila to a^^tar STEP 1 
THEN Print Fatal daviea error and drop unit 

iOB ENDTEST 
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^■Mitol* r«MMM« for iw c or r oct if«tttr«>\9t wvctor «ncLva#*: 

If lM» «n vrrvr apwifiotf Chw Imp to otart of t*i* tMt 

Tit* mu «•«• l^i W<Bpt>i antf tuti cwitv^Llor 
far all •rrors «n t*tt« tMt. 
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524 4.6 TEST 6 < Purge And Poll Test > - 

ill TEST DESCRIPTION: 

527 

528 This test Mill perfor* steps 1-S of the mitielize s«qo«nce 

529 then set the purge/poll bit in step 3. 

530 The purge/poll sequence will then proceed to: 

531 1. Qrite O's to the SA register to siMiulste ubs pur^s complete 

532 2. Read and disregard the IP register to start polling 

533 3. Wait For the controller to go into step 4. 
534 

535 TEST STEPS: 

536 

537 8GNTEST 

S3S Call dup ipinit to Mrite to the Ip register to begin 

539 hard initialize and wait for STEP 1. 

540 I'^ the TU81 fails to enter STEP 1 

541 THEN Print fatal device error and drop unit 

542 Compare step 1 data expd with recv 

543 IF data compare error 

544 THEN Print fatal device error and drop unit 

546 Call dup stepl to write step 1 bit pattern nnd wait step 2 

547 If the TU81 fails to enter STEP 2 

540 THEN Print fatal device error and drop unit 

549 Compare step 2 data expd with recv 

550 IF data compare error 

551 THEN Print fatal device error and drop unit 
552 

55S Call dup _step2 to write step 2 bit pattern and wait step 3 

554 IP the TU81 fails to enter STEP 3 

555 THEN Print fatal device error and drop unit 

556 Compare step 3 data expd with recv 

557 IF data compare error 

558 THEN Print fatal device error and drop unit 

559 * 

560 Call dup step3 to write puroe/poll bit (9B_pp_3) 

561 IF the controller fails to clear the SA within ICQ micros 

562 THEfi Print fatal device error and drop unit 

563 Urite O's to the SA to simulate uba purge complete 

564 Read and disregard the IP register to start polling 

565 * 

566 IP the TU81 fails to enter STEP 4 within 10 seconds 

567 THEN Print fatal device error and drop unit 

568 ENOTEST 
569 

570 

571 DEBUG: 

573 If loop on error specified then loop to start of test. 

574 The FRU is the Lesi Adapter for all errors in this test. 
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576 *.7 TEST 7 < Si-all ftlnQ Test > - 
577 

578 TEST DESCRIPTION: 

579 

see This t*st Mill do steps 1-4 of ths TU81 initialization. 

501 Mith the SMallest r^n^ buffer size (1 end and 1 rsp buffer) 

582 a^d i<-:terrupts disabled. 

583 The test will verify the controller clears the ring 

584 descriptor field in the host communications area. 

565 This is the first time the initialize sequence is carried 

586 out to the point where the controller npr's to memory 

567 are verified. 
566 

569 TEST STEPS: 

590 

591 BGNTEST 

592 Set cmd and rsp ring descriptors to -1 

593 Set cmd ring length Mord to 0 to indicate 1 cmd buffer 

594 Set rsp ring length word to 0 to indicate 1 rsp buffer 

595 Call Oup.Init to write to the Ip register to force 

596 a hard initialize, then perform steps 1-4. 

597 IF the TU81 fails to enter any step 

590 THEN print fatal device error and drop unit 

599 IF the cmd and rsp ring descriptors not cleared 

600 THEN print fatal device error and drop unit 

601 ENOTEST 
602 

603 

604 DEBUG: 
605 

606 If loop on error specified then loop to start of test. 

607 The FRU is the Lesi Adapter and TU81 controller 

608 for all errors in this test. 
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610 
611 
612 
613 
614 
615 
616 
617 
618 
619 
620 
621 
622 
623 
624 
625 
626 
627 
620 
629 



4.8 TEST 8 < riaxiauM Ring Buffer T«st > 
TEST DESCRIPTION: 



This t««t will do steps 1-4 of the TU81 initialiretion. 
Mith the largest number of ring descriptors allowed 
(128 c»d and 128 rap buffers) and interrupts disabled. 
The test will verify the controller clears the ring 
descriptor field in the host ccmnun i cat i ons area. 
This test verifies the controller can access the coaplctc 
host coHMMiunication area in Vax memory (1024*4 words). 

TEST STEPS: 
B6NTEST 

Set cmd and rap ring descriptors to -1 

Set cmd ring length word to 7 to indicate 128 cmd buffers (2**7-128) 
Set rsp ring length word to 7 to indicate 128 rap buffers (2**7-l28) 
Call Oup In it to write to the Ip register to force 

a hard initialize, then perform steps 1-4. 
IF the TU81 fails to enter any step 

THEN print fatal device error and drop unit 
IF the cmd and rsp ring descriptors not cleared 

THEN print fatal device error and drop unit 

ENOTEST 



DEBUG: 



If loop on error specified then loop to start of test. 
The FRU is the Lesi Adapter and TU81 controller 

for all errors in this test. 
Note: 

This test overlays the host communications area with 
128 cmd ring descriptors and 128 rsp ring deaeriptors. 
The actual associated ring buffers are not allocated. 
The rest of the tests use Just one cmd and one rsp 
buffer. 
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651 4.9 TEST 9 < Get OUST Status > - 
652 

653 TEST DESCRIPTION: 

654 

655 This test m!11 request the OUST status and verify the 

656 response packet is received as expected. 

657 It is also verifies invalid coMMand status is returned 

650 Mhen illegal modifiers are specified in the co««and packet. 

659 The GET OUST coMwand does not allot* any co«Miand modifiers. 

660 This is the first time a command packet is actually sent to 

661 the controller and a response pacKet received. 
662 

663 TEST STEPS: 

664 

d65 BGNSUB 1 *Get OUST command with valid modifiers* 

666 Set cmd and rsp ring descriptors to -1 

667 Set cmd ring length Mord to 0 to indicate 1 cmd buffer 
666 Set rsp ring length Mord to 0 to indicate 1 rsp buffer 

669 Call Oup In it to Mrite to the Ip register to force 

670 a hard initialize, then perform steps 1-4. Go bit set to 1 

671 IF the TUSl fails to enter any step 

672 THEN print fatal device error and drop unit 

673 IF the cmd and rsp ring descriptors are not cleared 

674 THEN print fatal device error and drop unit 

675 Call exe getdust to execute a GET OUST command 

676 IF Exe getdust returns SS$__TIMEOUT code 

677 THEN print fatal device timeout error and drop unit 
670 IF the rsp Command reference number NOT ■ 1 

679 THEN print hard device error 

600 IF the rsp Endcode NOT- (get.dust code * 200 octal) 

661 THEN print hard device error 

662 IF the rsp Status NOT- success 

663 IHEH print hard device error 

664 IF the rsp buffer FLAGS data is NOT as follOMs: 

665 1. Bit<0> - 1 !du_p_dust__flag__dis - disable other servers 

686 2. Bit<l> - 1 !dup dust flag media - server has local media (rom) 

607 3. Bit<2> ■ 1 !dup dust__f lag..nosup - exe supplied cmd not allowed 

600 4. Bit<3> - 0 !dup dust fla_g_act - server not active 

609 T»^N print hard device error 

690 ENOSUB 1 

691 

692 BGNSUB 2 *Get OUST command with illegal modifiers* 

693 Call exe_ .getdust to execute a GCT OUST command 

694 IF Exe._gctdust returns SS»_.TinEOUT code 

695 THEN print fatal device timeout error and drop unit 

696 IF the rsp Command reference number NOT « 2 

697 ThCN print hard device error 

690 IF the rsp Endcode NOT- Cget.^dust code * 80 hex) 

699 THEN print hard device error 

700 IF the rsp Status NOT- INVALIO CONHANO 

701 THEN print hard device error 

702 ENOSUB 2 
703 

704 ENOTEST 



PARAMETER COOING 
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SEQ 18 



706 DEBUG: 

/OS If loop on error specified th«n loop to start of taat. 

7C9 The FRU is th« Icsi adaptar or the TU81 controILar/sarvar 

7X0 for all arrors in this tast. 



PARAHETCR COOING 
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^0 19 



712 
713 
714 
715 
716 
717 

7ie 

719 
720 
7? I 
722 
723 
724 
725 
726 
727 
728 
729 
7^0 
751 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
7W 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 



4.10 TEST 10 < Functional Fault Detection T«st (Xntarnal Oriva Taat 1 > 
TEST DESCRIPTION: 

Thia ia a aanual C/aac:MnuaI) intarvantion taat that Mill axacuta 
the TU61 internal aicrodiagnoatic .Vl. 



TEST STEPS: 

BGNTEST < MANUAL > 

Print Meaaao* to «ount tape untcnsioned but Ioa<led 

"la the tape ready?" 
Call dup.init to write to the Ip regiater to force 

a hard initialize, than perform stepa 1-4. Go bi 
IF the TU81 faila to enter any atep 

THEN print fatal device error end drop unit 



t aet to 1 



Call DUP EXELQCAL to execute an EXECUTE LOCAL PROGRAM ceMMand 
IF Oupexelocal returna SS.GETDUSTMO 

THEN print Get duat comnand tiaeout 
IF Dup.exelocal returna SS.NOTIOLE 

THEN print controller not in idle atata 
IF Dup.exelocal returna SS$ .TIMEOUT 

THEN print controller failed to return packet 
IF Oup exclocal returns SS.EXEBADREF 

THEN print invalid coamand reference 
IF Oup exelocal returna SS.NOTSUCCESS 

THEN print controller failed to return auccaaa in packet 
IF Oup EXELOCAL returna SS.DUSTBAOREF 

THEN print Invalid coaaand reference 
IF Dup.exelocal returna SSI.OEVINACT 

THEN print controller failed to enter active atata 
IF Dup exelocal returns SS.RECVTMO 

THEN print Controller failed to accept receive data connand 
IF Dup.exelocal returna SS.PROGTMO 

THEN print progreaa indicator not updated before timeout 
IF Oupexelocal returns SS.RECVINVMSG 

THEN print Receive data returned invalid meaaaoe number 
IF Dup.exelocal returns SS.RECVERR2 

THEN print Receive data ratutned internal test failed 

and print the aasaaoa buffer fault coda and subcode, 
and print refer to SAMS for fault coda maanings. 
IF Dup exelocal returna SS.SAERR 

THEN print controller error Mhile in execute local program 



ENOTEST 



0E8U6: 



If loop on error specified then loop to start of test. 

The FRU is les< Adapter for initialize errora 

or the TU81 controller /server for all other Trof. 



PA'tAnCTCR COOING 
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SEQ 20 



765 
766 
767 
768 
769 
770 
7/1 
772 
773 
774 
775 
776 
777 
778 
779 
760 
78X 
782 
783 
784 
785 
766 
767 
768 
789 
790 
791 
792 
793 
794 
795 
796 
797 
798 
799 
800 
601 
602 
80S 
804 
80S 
606 
807 
608 
809 
810 
611 
812 
813 
614 
615 
616 



4.11 TEST 11 < Tans ion Fault Isolation Tast CIntarnal Or>v« Taat 2)> 

TEST DESCRIPTION: 

This ia a Fault C/aac: Fault) intarvantion tast that Mill axacuta 
tha TU81 intamal aicrodiagnost ic .•2. 

Intamal tast .#2 iaolatas sarvo faults by chacking diffcrant 
>lias of tha STU. 



TEST STEPS: 

BGNTEST <Fault> 
Print 



ENOTEST 



"Mount a scratch tap« THREAOEO but UNTENSIONEO" 
"Is tha tapa raady?" 

Call dup init to writa to tha Xp rag! star to forca 

a hard initializa. than parfora staps 1-'^. Go bit sat to 1 
IF tha TU81 fails to antar any stap 

THEN print fatal davica error and drop unit 
Call OUP.IXELOCAL to axacuta an EXECUTE LOCAL PROGRAM comnand 
IF Oup axaloeal raturns SS.GETOUSTHO 

THEN print Gat dust cenniand timaout 
IF Dup.axalocal raturns SS.NOTIOLE 

THEN print controller not in idla state 
Dup.axelocal raturns SS«.TIMEOUT 
THEN print controller failed to return packet 
IF Oup.axelocal returns SS.EXEBAOREF 

THEN print invalid command reference 
IF Oup exelocal returns SS.NOTSUCCESS 

THEN print controller failed to return success in packet 
Oup.EXELOCAL returns SS.DUSTBADREF 

THEN print invalid command reference 
Dupexelocal raturns SS*_0EVINACT 

THEN print controller failed to enter active st(>te 
Dup_axalocal raturns SS.RECVTnO 

THEN print Controller failed to accept receive data command 
Dud exelocal returna SS.PROGTHO 
THEN print prograas indicator not updated before timaout 
IF Oup_axelocol returns SS.RECVINVMSG 

THEN print Receive data returned invalid massage number 
IF Oup.exelocal raturns S5.RECVERR2 

THEN print Receive data returned internal test failed 

and print the message buffer fault coda and subcode, 
and print refer to SAMS for fault coda meanings. 
IF Oup.exelocal returna SS.SAERR 

THEN print controller error while in execute local program 



IF 



IF 
IF 
IF 
IF 



DEBUG: 



If loop on error specified then loop to start of test. 



PAAAMETER COOING 
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SEQ 21 



816 
019 
820 
821 
822 
823 
824 
825 
826 
827 
828 
829 
830 
631 
8J2 
633 
834 
835 
836 
837 
836 
639 
640 
841 
842 
843 
844 
845 
846 
847 
848 
849 
850 
851 
852 
853 
854 
855 
856 
857 
856 
859 
660 
861 
662 
663 
664 
665 
866 
667 
666 
669 
870 
671 
872 



4.12 TEST 12 < Velocity Fault Isolation T«st (Internal Oriv« T««t 51> 

TEST DESCRIPTION: 

This ia a Fault C /sac: Fault) intarvantion taat that Mill axacuta 
the TU81 intarnal aicrodiagnoat ic _*3. 

Internal taat .43 isolataa velocity aervo faults by checking 

the take up aotor/tach aasaably and tha velocity aervo 

loop. 



TEST STEPS: 

BGNTEST <Feult> 
Print 



Call 



IF 



tha taps fro* tha 
k RinOVED?" 



drive' 



aat to 1 



ENOTEST 



'Remove 
'la tha tape 

dup in it to Mrita to the Ip roQiatar to force 

a hard initialize, than parfora ataps 1-4. Go bit 
the TU81 fails to enter any atep 
THEN print fatal device error and drop unit 
Call DUP.EXELOCAL to execute an EXECUTE LOCAL PROGRAM coaaand 
IF Oup.exelocal returns SS.GETOUSTHO 

JmEU print Get dust coaaand tiaeout 
Dup.exelocal returns SS.NOTIOLE 

THEN print controller not in idle state 
Dup.exelocal returns SS*. TIMEOUT 

THEN print controller failed to return packet 
Dup axclocal returns SS.EXEBAOREF 

THEN print invalid coaaand reference 
Dup.exelocal returna SS.NOTSUCCESS 
THEN print controller failed to return auccesa in packet 

Dup.exelocal returna ss.oustbaoref 

THEN print invalid coaaand reference 
Dup.exelocal returns SS»_0EVINACT 

THEN print controller failed to enter active state 
Dup.exelocal returns SS.RECVTMO 

THEN print Controller failed to accept receive data coaaand 
Oup exelocal returna SS.PROGTMO 

THtN print progreaa indicator not updated before tiaeout 
Dup.exelocal returna SS.RECVINVMSG 

THEN print Receive data returned invalid aaaaaga nuabar 
Dup.exelocal returns SS_RECVERR2 
THEN print Receive data returned internal teat failed 

and print the aceaaoe buffer fault code and aubcode. 
and f.rint refer to sAMS for fault code aeaninga. 
Dup exeloc0jL returna SS.SAERR 
THEN prinl controller error Mhile in execute local program 



IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 
IF 



IF 



DEBUG: 



If loop on error specified then loop to start of test. 

The FRU is lesi Adapter for initialize errors 

or the TU81 controller/server for all other errors. 



PAAAriETER COOING 
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SEQ 22 



874 4.13 TEST 13 < S*l*ct A Oriv* Rcsidw^t Test (Internal Oriv* Taata 1-99) > 

S76 TEST DESCRIPTION: 

•77 

870 This aaction (/aaciFAULT) Mill aak the oparator 

879 to aalact a drive raatdant aicrodiaanoatic. Tha raaidant 

080 taat Nill ba atartad uaing tha Oup txacuta local prograii 

881 function and aionitorad by Oup Gat Duat atatua function calla. 

882 Tha internal taata are daacribad in the Drive Maintenance Manual. 
883 

884 

883 TEST STEPS: 
886 

887 BGNTEST <FAULT> 

888 

889 Print naaaaga "Enter drive unit nuMber 

890 If^ the unit number ia invalid 

891 THEN Print error meaaaoe and aak again 

892 Print meaaaga "Enter controller internal teat number <l-99>:" 

893 IF the reaident teat naaa ia not in the valid name table 

894 THEN Print error Meaaaga and aak again 
89S 

896 Print meaaaga "Setup the tape drive per the Maintenance 

097 manual for thia internal teat 

090 READY? 

099 Accept any responae as ready 
900 

901 Call dup init to write to the Ip register to force 

902 • hard initialize, then perform atapa 1-4. Go bit set to 1 

903 IF the TU81 faila to enter any step 

904 THEN print fatal device error and drop unit 

905 Call OUP.EXELOCAL to execute an EXECUTE LOCAL PROGRAM command 

906 IF Dup.exelocal returna SS.GETOUSTMO 

907 THEN print Get duat command timeout 
900 IF' Oup.exelocal returna SS.NOTIOLE 

909 IHEM print controller not in idle state 

910 IF Oup exe local returna SS*_TIMEOUT 

911 THEN print controller failed to return packet 

912 IF Oup exelocal returna SS.EXEBAOREF 

913 THEN print invalid command reference 

914 IF Dup exelocal returna SS NOTSUCCESS 

915 THEN print controller failed to return success in packet 

IF Dv;p_EXELOCAL returna SS.DUSTBADREF 

t ' THEN print invalid command reference 

91u IF Oup.exelocal returna SSI.DEVINACT 

919 T^N print controller failed to enter active atate 

920 IF Oup.exelocal returna SS RECVTMO 

921 THEN print Controller failed to accept receive data command 

922 IF Oup.exelocal returns SS.PROGTHO 

923 THEN print progress indicator not updated before timeout 

924 IF Oup.exelocal returns SS.RECVINVMSG 

925 THEN print Receive data returned invalid maasage number 



PARAMETER COOING 
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SEQ 23 



927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 
94S 
946 
957 
958 
984 
986 
987 
988 
990 
991 
992 
993 
994 
995 
996 
997 
998 
999 
1007 
1008 



000000 



002000 



002000 



IF Oup.cxclocal returns SS_RECVERR2 

THEN print R«c«iv« data returned intarnal test failed 

and print the Mssao* buffer fault code and subcode, 
and print refer to SAfIS for fault code Meanings, 
IF Ov^.exelocal return* SS.RECVHSGS 

THEN print contents of receive data Mssaoe buffer (not an error) 

IF Oupexe local returns SS.SAERR 

THEN print controller error Mhile in execute local proftrast 



002000 



ENOTEST 



DEBUG: 

If loop on error specified then loop to start of test. 

The FRU is lesi Adapter for initialize errors 

or the TU81 controller/server for all other errors. 

8 

.TITLE PROGRAM HEADER AND TABLES 
.SBTTL PROGRAn HEADER 



.ENABL ABS.AMA 
!nLIST SEX 
BGNTIOO 



2000 



: ♦♦ 



THE PROGRAM HEADER IS THE INTERFACE BETUEEN 
THE DIAGNOSTIC PROGRAH AND THE SUPERVISOR. 



POINTER BGNDU.ERRTBL.BGNRPT 



002000 




HEADER 


CZTU2.B, 0.120. .O.PRIOO 


002000 




L INANE: : 




{DIAGNOSTIC NAME 


002000 


103 


.ASCII 


/C/ 




002001 


132 


.ASCII 


/z/ 




002002 


124 


.ASCII 


/T/ 




002003 


125 


.ASCII 


/U/ 




002004 


062 


.ASCII 


/2/ 




002005 


000 


.BYTE 


0 




002006 


000 


• BYTE 


0 




002007 


000 


.BYTE 


0 




002010 




LtREV:: 




: REVISION LEVEL 


002010 


102 


.ASCII 


/B/ 


002011 




LIDEPO: : 




iO 


002011 


060 


.ASCII 


/O/ 




002012 




LIUNIT: : 




{NUMBER OF UNITS 


002012 


000000 


.WORD 


0 




002014 




LITIML: : 




{LONGEST TEST TIME 


002014 


000170 


.UORD 


120. 




002016 




LIHPCP:: 




{POINTER TO H.U. QUES 


002016 


045110 


.WORD 


L»HARD 







AMD TMl 


MACRO V05 OS yttf 












LISPCP; ; 


WfcVCV 




.WORD 


WcVCC 




lIHPTP: : 




002224 


UORD 






LISPTP: : 




oooooo 

www 


.UORD 






LILAOP: : 




0621S0 


.WORD 






LISTA: : 


0020S0 


OOOOOO 


.WORD 






LICO: : 


00P032 


oooooo 


.UORD 


0020S4 




LIDTYP: : 


0020S4 


OOOOOO 


• UORD 


0020S6 




LIAPT: : 


0020S6 


OOOOOO 


.WORD 


002040 




LtDTP: : 


002040 


002124 


.WORD 


002042 




LIPRIO: : 


002042 


COOOOO 


.WORD 


002044 




LIENVI: : 


002044 


OOOOOO 


.WORD 


002046 




LIEXPl: : 


002046 


OOOOOO 


.WORD 


002050 




LtnREV: : 


002050 


004 


.BYTE 


002051 


000 


.BYTE 


002052 




L#EP: : 


002052 


OOOOOO 


.ucmo 


002054 


OOOOOO 


.WORD 


002056 




L*SPC: : 


002056 


OOOOOO 


.WORD 


002060 




LIDEVP: : 


002060 


022766 


.WORD 


002062 




LtREPP: : 


002062 


OOOOOOG 


.WORD 


002064 




LIEXP4: : 


002064 


OOOOOO 


.WORD 


002066 




LIEXPS: : 


002066 


OOOOOO 


.WORD 


002070 




LIAUT: : 


002070 


OOOOOO 


.WORD 


002072 


LIDUT: : 


002072 


0SS774 


.WORD 


002074 




L9LUN: : 


002074 


OOOOOO 


.WORD 


002076 




LtOESP: : 


002076 


002156 


.WORD 


002100 




LILOAD:: 


002100 


1040SS 


EMT 


002102 




LIETP:: 


002102 


OOOOOOG 


.WORD 


002104 


LIICP:: 


002104 


0SS464 


.UOM) 


002106 




LICCP:: 


002106 


0SS744 


.WORD 


002110 




LtACP:: 
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.POINTER TO S.U. QUES. 

0 

tPTR. TO OEF. H.W. PTABLE 

L*HU 

:PTR. TO S.W. PTABLE 

0 

sDIAG. END ADDRESS 

LtLAST 

t RESERVED FOR APT STATS 

0 
0 

i DIAGNOSTIC TYPE 

0 

lAPT EXPANSION 

0 

;PTR. TO DISPATCH TABLE 
L IDISPATCH 

: DIAGNOSTIC RUN PRICWITY 

PRIOO 

s FLAGS DESCRIBE HOW IT WAS SETUP 

0 

{EXPANSION WORD 

0 

I SVC REV AND EDIT * 
CIREVISION 
CIEDIT 

tDIAG. EVENT FLAGS 

0 
0 

0 

I POINTER TO DEVICE TYPE LIST 

LIDVTYP 

:PTR. TO REPORT CODE 

LIRPT 

0 

0 

:PTR. TO ADD UNIT CODE 

0 

sPTR. TO DROP UNIT CODE 

LtDU 

iLUN FOR EXERCISERS TO FILL 

0 

sPOINTER TO DIAG. DESCRIPTION 

LIOESC 

: GENERATE SPECIAL AUTOLOAD EMT 

E»LOAD 

{POINTER TO ERRTBL 

LtERRTBL 

jPTR. TO INIT CODE 

LIINIT 

iPTR. TO CLEAN-UP CODE 

LICLEAN 

:PTR. TO AUTO CODE 



PffOCAAH HEAOCR MC TM8LES 

002 U0 OOOOOOG 
002112 

002112 022760 
002114 

002114 OOOOOO 
002116 

002116 OOOOOO 
002120 

002120 OOOOOO 

1009 



fMOK) ¥05.03 

LtPRT: 
L9TEST 
L»OLTj 
LfHIfC 
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2S-2 



SCO 2% 



.UORO 



.yoRO 

.UORO 

.yoRO 



LIAUTO 

LIPROT 

0 

0 

0 



«PTR. TO PROTECT TUBLE 
:TCST NUHBER 
s DELAY COUNT 
tPTR. TO HIGH HEH 



*MC»0 vOS 03 
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SSTTL DISPATCH TABLE 



T»C DISPATCH TA0L£ OMTiaMS T>C STAftTHC AfiOMESS OF CA04 TTST 
IT IS U5B> tT THE SUPCmSOR TO OISMTCM TO EACH TEST. 



DISPATCH iS. 
.MONO IS 
LfOISPATCN: : 

Tl 
T2 
T5 
T4 
T5 
T6 
T7 
Tt 
T» 

no 

Til 
T12 
T15 



124 



LIOESCtt 



lOlS 



OCSOIZPT 
.ASCIZ 



<CZTU2B0 TU01 FUNCTIONM. 0IAG>I0STIC> 
/CZTU2M TUB! fUNCTIONAL DIAGNOSTIC/ 



1035 

1038 
1039 
1040 
1041 
1042 
1043 



1044 

1050 
1051 
1052 
1055 



002222 

002222 000003 

003224 

002224 

002224 174500 
002226 000260 
002230 000000 
002232 
002252 
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.SSTTL DEFAULT HARDWARE P TABLE 



i** 



SCO 27 



THE DEFAULT HARDWARE P- TABLE CONTAINS DEFAULT VALUES OF 
THE TEST -DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P TABLES. 



i - - 



LIHU: : 

DFPTBL:; 



LIOOOO: 



BGNHU 
.WORD 



.WORD 
.WORD 
.WORD 
ENOHW 



DFPTBL 

LIOOOO -L(HW/2 



174500 

260 

0 



TUIP BASE ADDRESS 
VECTOR 

T/MSCP UNIT NUMBER 



000000 



PROGRAM HEADER AND TABLES 
SOFTWARE P- TABLE 



1056 
1057 
1050 
1059 
1060 
1061 
1062 

1063 002232 
002232 
002234 
002234 

1064 
1071 

1072 002234 
002234 

1073 

1074 002234 

1086 

1087 

1115 

1116 

1117 002234 

1118 

1119 

1120 

1121 

1122 

1123 

1124 002234 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
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.SBTTL SOFTWARE P-TABLE 



I** 



SEQ 26 



J THE SOFTWARE P-TABLE CONTAINS THE VALUES OF THE PROGRAM 
I PARAMETERS THAT CAN BE CHANGED BY THE OPERATOR. 



LtSU: : 
SFPTBL: ; 



BGNSW 
.WORD 



SFPTBL 

LlOOOl-LtSW/2 



ENOSW 

L 10001: 

ENDMOO 
.TITLE GLOBAL AREAS 
.SBTTL GLOBAL EQUATES SECTION 



BGNMOD 



!*THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
t ARE USED IN MORE THAN ONE TEST. 

! - - 



EQUALS 
! BIT DIFINITIONS 



BIT15-- 


• 100000 


BIT14-> 


• 40000 


BIT13- 


. 20000 


BIT12- 


. 10000 


BlTll- 


• 4000 


BITIO- 


• 2000 


BIT09-> 


• 1000 


BIT08-' 


• 400 


BIT07-> 


> 200 


BIT06-' 


■ 100 


BIT05- 


■ 40 


BIT04-. 


• 20 


BIT03-' 


■ 10 


BIT02-' 


• 4 


BITOl- 


• 2 


BITOO- 


■ 1 


BIT9" 


BIT09 


BIT8" 


BIT06 


BIT7-" 


BIT07 


BIT6" 


BIT06 


BITS" 


BIT05 


BIT4" 


BIT04 


BIT3" 


BIT03 


BIT2" 


BIT02 



GLOBAL AREAS MACRO V05.03 
GLOBAL EQUATES SECTION 

000002 
000001 
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BIT1-- BITOl 
BITO-- BITOO 

* EVENT FLAG DEFINITIONS 

EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 

> BIT POSITION IN SECOND STATUS WORD 
i (100000) START COMMAND UAS ISSUED 
(040000) RESTART COMMAND UAS ISSUED 
(020000) CONTINUE COMMAND WAS ISSUED 
(010000) A NEW PASS HAS BEEN STARTED 
(004000) A POUER-FAIL/POWER-UP OCCURRED 



SEQ 29 



000040 


EF 


.START-- 


32. 


000037 


EF 


. REST ART " 


31. 


000036 


EF 


.CONT^NUE" 


30. 


000035 


EF 


.NEW" 


29. 


000034 


EF 


.PUR-- 


28. 



000340 
000300 
000240 
C00200 
000140 
000100 
000040 
000000 



000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 



; PRIORITY LEVEL DEFINITIONS 

PRI07" 340 
PRI06-- 300 
PRI05-- 240 
PRI04-- 200 
PRI03-- 140 
PRI02" 100 
PRI01-- 40 
PRIOO"- 0 

I OPERATOR FLAG BITS 

EVL-- 4 

LOT" 10 

A0R-- 20 

IDU" 40 

ISR" 100 

UAM" 200 

BOE" 400 

PNT-- 1000 

PRI-- 200C 

IXE-- 4000 

IBE" 10000 

lER" 20000 

L0E-- 40000 

H0E-- 100000 



I 



GLOBAL AREAS MACRO V05.0S 
GLOBAL EQUATES SECTION 

1129 
1150 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1158 

1139 000000 

1140 000002 

1141 000004 

1142 000006 

1143 000010 

1144 000012 

1145 000014 
1146 

1147 
1146 
1149 
1150 
llSl 
1152 
1153 
1154 
1155 
1156 
1157 
1156 

1159 000001 
1160 

1161 000002 
1162 

1163 000004 
1164 

1165 000010 
1166 

1167 000020 
1166 
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SEQ 50 



! I< 



iLUN.BLOCK OFFSETS 

THESE LITERALS ARE USED AS WORD OFFSETS INTO THE LUNBLK. WHICH 
IS PCINTED TO THROUGH(WT THE PROGRAM BY R4. 



s 
i 
I 

1 > 
i i 



TUIP 

TUSA 

TUVEC 

nSCPUN 

TUIPSV 

TUSASV 

LUNFLG 



0 
2 
4 
6 
10 
12 
14 



sTUlP REGISTER ADDRESS 

:TUSA REGISTER ADDRESS 

jTU INTERRUPT VECTOR 

;T/MSCP UNIT NUMBER 

{SAVE LOCATION FOR IP CONTENTS 

:SAVE LOCATION FOR SA CONTENTS 

: BIT -SPECIFIC MEANINGS AS DEFINED BELOW 



LUNFLG 



THIS WORD IN LUNBLK IS USED TO CONVEY VARIOUS INFORMATION 
IN A BIT -SPECIFIC MANNER. BITS USED BY THE PROGRAM ARE 
DEFINED AS FOLLOWS. 



DRPFLG 
INTFLG 
BRFLAG 
TEST. 9 
DONEFL 



BITO 
BITl 
BIT2 
BITS 
BIT4 



•0 UUT AVAILABLE FOR TEST 

-1 UUT HAS BEEN DROPPED 

-1 EXPECTED INTERRUPT OCCURRED 

J -I INTERRUPT PRIORITY TEST 

;-l TEST 9 FLAG 

s-1 INTERNAL DRIVE TEST DONE 
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GLOBAL EQUATES SECTION 



1170 










1171 










1172 










1173 




sUQ-PORT EQUATES 




1174 




; THIS SECTION DEFINES THOSE LITERALS USED 


1175 




i BY 


THE DIAGNOSTIC IN THE UQ-PORT PROTOCOL. 


1176 




J IN 


GENERAL THEY 


HAVE BEEN FORMED BY USING 


1177 




! THE 


TUO LETTER 


MNEMONIC DEFINED IN l/QSSP. 


117S 




; PRECEDED BY "B. 


" INDICATING THEY ARE BITS. 


1179 




1 






1180 










llSl 










1182 










118S 




i READ-ONLY 


BITS 




1184 










118S 


004000 


B.Sl 


BITll 


:STEP 1 


1186 


010000 


B.S2 


BIT12 


J STEP 2 


1187 


020000 


B.S3 


BIT13 


.•STEP 3 


1168 


040000 




DTT 1 A 

OX 1 


J STEP 4 


1169 










1190 


100000 


B.ER 


BIT 15 


i ERROR INDICATION 


1191 


002000 


B.NV 


BITIO 


• mis UPrTnB TC MflCT CPTTARI P 


1192 


001000 


B.QB 


BIT9 


;-l SUPPORTS 22 BIT HOST BUS 


1193 


000400 


8.01 


BIT8 


:-l SUPPORTS ENHANCED DIAGNOSTICS 


1194 


000200 


B.OO 


BIT7 


;-l SUPPORTS ODD BUFFER ADDRESSES 


1195 


000100 


B.MP 


BIT6 


!-l SUPPORTS ADDRESS MAPPING 


1196 










ll*f 




sURITE-ONLY 


BITS 




1198 










1199 


100000 


B.PP 


BIT15 


! PERFORM PURGE AND POLL TESTS 


1200 


040000 


B.UR 


BIT14 


; ENTER DIAGNOSTIC URAP MODE 


1201 


000002 


B.LF 


BITl 


:LAST FAIL REQUEST 


1202 


000001 


B.PI 


BITO 


s ENABLE ADAPTER PURGE INTERRUPTS 


1203 


000001 


B.GO 


6IT0 


tGC BIT - START RUNNING 


1204 
120S 




tREAD/URITE 


BITS 




1206 
1207 


000200 


B.IE 


BIT7 


•.STEP X-TION INTERRUPT ENABLE 


1206 











! 



I 
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GLOBAL EQUATES SECTION 
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SEQ 12 



1210 




1211 




1212 




121S 




1214 




1215 




1216 




1217 




1216 


000004 


1219 


000003 


1220 


000014 


1221 


177560 


1222 


177562 


1223 


177746 


1224 





GENERAL PURPOSE EQUATES 



I 

• 5 

i i< 



4 ; VECTOR FOUR - NXM TIMEOUTS. ETC. 

3 s CONTROL C (ASCII) 

14 iBIT POSITIONS 2 AND 3 DISABLE CACHE IN CCR 

177560 J TERMINAL RECEIVE CONTROL /STATUS REGISTER ADDRESS 

177562 : TERMINAL RECEIVE BUFFER ADDRESS 

177746 i CACHE CONTROL REGISTER ADDRESS 



VEC4 

CNTRLC 

DISCAC 

RCSR 

RBUF 

CCR 
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GLOeAL EQUATES SECTION 





































MANAGEMENT EQUATES 






i 






































177572 




■« 177S72 


1 ^TATUC RPR O 




177574 


nnusRi 


177574 




1236 


177576 


nnusR2 


-> 177576 




1237 


172516 




X r c>-#Av 


•SHOULD ONLY BE PRESENT ON 22 BTT CPU'S 


123B 








1239 


172540 


KPARO 


A • C«*^W 


iKERICL MODE PAGE ADDRESS REG 0 


1240 


172342 


KPARl 


■a 172342 




1241 


172344 


KPAR2 


172344 




1242 


172346 


KPAR3 


mm 172346 




1243 


172350 


KPAR4 


mm 172350 




1244 


172352 


KPAR5 


172352 




1245 


172354 


KPAR6 


172354 




1246 


172356 


KPAR7 


172356 


:ALUAYS FOR I/O PAGE 


1247 








1246 


172300 


KPORO 


172300 


1 KERNEL MODE PAGE DESCRIPTOR REG 0 


1249 


172302 


KPDRl 


172302 




1250 


172304 


KP0R2 


172304 




1251 


172306 


KP0R3 


172306 




1252 


172310 


KPDR4 


172310 




1253 


172312 


KP0R5 


172312 




1254 


172314 


KP0R6 


172314 




1255 


172316 


KP0R7 


172316 




1256 










1257 


000001 


nnoN 


BITO 


; ENABLE MMU - MMUSRO 


1256 


000020 


rif1220N 


B1T4 


{ENABLE 22 BIT MMU - MMUSR3 


1259 











GLOeAL AREAS MACRO V0S.03 
GLOBAL EQUATES SECTION 

1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 

1269 000001 

1270 000003 

1271 000005 

1272 000006 

1273 000200 
1274 

1275 
1276 
1277 
1278 
1279 
1280 
1281 
1282 
1283 

1284 000000 

1285 000010 

1286 000012 

1287 000014 

1288 000020 

1289 000010 

1290 000012 

1291 000017 

1292 000020 

1293 000022 

1294 000024 
1295 
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SEQ 34 



COMMAW) PACKET OPCODES 



OP.GDS 
OP.ELP 
OP.REC 
OP. AST 
OP. END 



01 
03 

05 
06 
200 



GET DUST STATUS OPCODE 
EXECUTE LOCAL PROGRAM OPCODE 
RECEIVE DATA OPCODE 
ABORT PROGRAM OPCODE 
sEND MESSAGE FLAG OPCODE 



{ I *************************************************************** 

; i ********************* ************ 

joUP COMMAND AND END MESSAGE OFFSETS 
; 

, I *************************************************************** 
( J ••****•••••••**•••♦•****••♦•*••*•••*••••••**•♦♦•••***•♦•♦♦••••* 



P.CRF 

P.OPCD 

P. MOD 

P.BCNT 

P. BUFF 

P.ENDC 

P.STS 

P.FLGS 

P.INDl 

P.IND2 

P.TIMO 



0 
10 

12 
14 

20 
10 
12 
17 
20 
22 
24 



COMMAND REFERENCE NUMBEr> 

COMMAND OPCODE 

COMMAND MODIFIERS 

BYTE COUNT 

BUFFER DESCRIPTOR 

END MESSAGE ENDCODE 

END MESSAGE STATUS 

END MESSAGE FLAGS 

1ST UORD OF PROGRESS INDICATOR 

2ND UORD OF PROGRESS INDICATOR 

TIMEOUT VALUE 



GLOBAL AREAS MACRO V05.03 
GLOBAL EQUATES SECTION 

1297 
1296 
1299 
1300 
1301 
1302 
1303 
1304 

1305 100000 

1306 004000 

1307 000001 

i3oa 

1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 

1318 100000 

1319 040000 

1320 000200 

1321 000010 

1322 000000 

1323 000000 

1324 000004 

1325 000104 
1326 

1327 
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J ;******************«******•**********«« 
J •************«******•***«***•*****«•**« 

Itusa bit definitions 

t 

» I ♦*****•♦••••*••••••••••*••••••♦••♦•*•< 

ERR » 100000 (ERROR 

SI " 004000 .-STEP 1 

GO " 000001 ;G0 



SEQ 35 



!u/Q PORT 



LITERALS 



I ; *************************************************************** 



OWN 

FLAG 

IW1 

TF.BLK 

HSTinO 

tISCPVR 

RNGSTP 

RSPSTP 



100000 

040000 

000200 

10 

0 

0 

4. 
68. 



{DESCRIPTOR OWNERSHIP BIT 
(DESCRIPTOR INTERUPT FLAG BIT 
(IMHEOIATE COMMAND FLAG 
J TAPE FORMAT 

HOST TIMEOUT VALUE 

MSCP VERSION NUMBER 

DESCRIPTOR RING STEP 

RESPONCE BUFFER STEP 



GLOBAL AREAS MACRO V05.03 
GLOBAL EQUATES SECTION 

1329 
1330 
1331 
1332 
1333 
1334 
1335 
1336 

1337 000002 

1358 177777 

1359 177776 

1540 177774 

1541 000005 

1542 000011 
1345 000000 
1544 
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SEQ 56 



> : ' 

• 9 



iTMSCP DRIVER BUFFER OFFSETS 



1 1< 



HIAOOR 

CONID 

CRD 

nSGLEN 
TXFER 
DRVER 
CNTER 



2. 
-1. 
-2, 
-4. 

5. 

9. 

0. 



: DESCRIPTOR ADDRESS OFFSET 

tCOMMAW/RESPONSE CONNECTION TYPE I.D. 
COHHANO/RESPONSE CREDIT LiniT OFFSET 
COrtlANO/RESPONSE MESSAGE LENGTH 
ERROR FORMAT FOR "TAPE TRANSFER- ERROR LOG 
ERROR FORMAT FOR "DRIVE ERROR" ERROR LOG 
ERROR FORMAT FOR "CONTROLLER ERROR" ERROR LOG 



I 



CLOeM. AREAS riACPO V05.03 
GLOeAL DATA SECTION 

1346 
1347 
1346 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
13S0 
1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1369 
1369 
1370 
1371 

1372 002234 

1373 

1374 

1375 

1376 

1377 

1376 

1379 

1360 

1361 

13e2 

li6S 

1364 

1385 

1366 

1367 

1366 002272 
1369 

1390 002302 
1391 
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S£Q 37 



1 1 ••••••*•••••••••••••••••••••••••••••••••••••••••••••••••••••••• 

I THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 

I IN nORE THAN ONE TEST. 

I 

1 1*************************************************************** 
1 1*************************************************************** 

1 1*************************************************************** 
1 1 ****•••***•••****•••••**•••*•••«*•••••*••**••••••••***•••••*•*• 

'tLUNBLK 

I THIS BLOCK OF MEMORY IS USED TO STORE VARIABLE INFORMATION 

t PERTAINING TO THE CURRENT LOGICAL UNIT UNDER TEST. LUNBLK 

I IS POINTED TO THROUGHOUT THE PROGRAM BY R4 AND INDIVIDUAL 

i LOCATIONS ARE ACCESSED VIA LITERALS DEFINED ABOVE. 

I 

1 1 •••*••••♦•••*•*••**•••*••••••**•♦•*••••*••*••••••••*•••••••••♦• 

5 ,**••*«*******•******************************************•****** 



LUNBLK: 



.BLKU 15. 



I *••*•*•**••***«**••*•***••••••****•*••***« 

UQ-PORT NECESSITIES 

THESE TABLES ARE SET UP BY VARIOUS 
TESTS UITH VALUES TO BE URITTEN TO 
Tt-C P(MT. AND COMPARISON VALUES TO 
CHECK THE PORT AFTER EACH STEP TRAN- 
SITION OCCURS. RESPECTIVELY. 



S I' 

t >< 



STPTBL: 
CMPTBL: 



.BLKU 
.BLKU 



J VALUES URITTEN TO THE PORT 
: COMPARISON VALUES 



GLOtAl. DATA SecrXON 
1396 

1 w 
IJW 

1400 
1401 
1402 

140S 002S12 000000 

1404 0O3ll4 000000 
1409 

140* 002Si« 000900 

1407 002S20 000000 

1400 002S22 000000 
1409 
1410 

1411 0023^4 000000 

1412 002S26 COOOOO 
141S 0023SO OOOOOO 

1414 002352 OOOOOO 

1415 002334 OOOOOO 
141« 002536 OOOOOO 
1417 002340 OOOOOO 

1419 002342 OOOOOO 
14 1« 002344 OOOOOO 

1420 002346 OOOOOO 

1421 002350 OOOOOO 

1422 002332 OOOOOO 

1423 002S94 OOOOOO 

1424 002356 OOOOOO 

1425 002360 OOOOOO 

1426 002362 OOOOOO 
142' 

14^41 
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36 



1 1 •*•*••***•**•••••*••••••••••••••••••••••••••••••»•• *••••••••*•« 

IraOGRAn aMTROL VMIII6LES 

( TICSE GLOBM. VM)IIIM.CS ARC GCNERALLY USED TO CONTROL THE 

t asamjL execution of nc diagnostic. 



1 1< 
1 1< 



PASCNT: 
KTrLAC: 

TilP4rC: 
PARO FFi 
OVOR: 



cnAm.G 

FRU2S; 
LOGUNT 
SAEXP: 
INISTP 
STEPST 
UROATA 
INNER: 
OUTER- 
TOUT: : 
TEMP; : 
ANnuER 
PftOCftL 
PROGRH 
CPFLAG 



.UORO 
.UORO 



.WORD 

.uom> 

.WORD 
.WORD 
.WORD 
.UORO 
.WORD 
.UORO 
.WORD 
.UORO 
.WORD 
.WORD 
.UORO 
.UORO 
.WORD 
.WORD 



0 
0 



.UORO 0 
.UORO 0 
.WORD 0 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



CUMULATIVE PROGRAH PASS COUNTER 

-o rcnoRY fwnt^xsEmm not available 

-I fCnORY nANAGErCNT IS AVAILABLE 
-1 TRfM> TO VECTOR OCCURRED 

USED IN TEST 7 TO STEP THROUGH UPPER MEHORY 
>0 NO ERROR IN COrtlUNICATION AREA 
-1 ERROR WITHIN COMMUNICATION AREA 

ERROR BEYOND BOUNDS OF COMN AREA 
* OF CONTIIklOUS WORDS IN ERROR IN COMM AREA 
LENGTH OF COMM AREA FOR TEST N 
POINTER TO FAULTY FRU ASCII FOR PRINTOUT 
LOGICAL UNIT • OF CURRENT UUT 
LOADED WITH EXPECTED SA FOR ERROR CHECKING 
CURRENT STEP OF INIT SEQUENCE 
SUCCESS/FAIL STATUS FROM STEP SUBROUTINES 
LOADED WITH DATA FRO WRAP MODE TEST 
COUNTER FOR POELAY ROUTINE 
OTHER COUNTER FOR POELAY 
TIMEOUT INDICATOR FOR POELAY 
TEMPORARY STORAGE LOCATION 
LOGICAL ANSWER IN MANUAL TEST SECTION 
SAVE LOCATION FOR 1ST UORO OF PROGRESS INDICATOR 
SAVE LOCATION FOR 2N0 WORD OF PROGRESS INDICATOR 
I CACHE PRESENT FLAG 



V ;9»j *PF*S »1*C»0 V05.03 



09-0ct-«5 10;W ^« 



17 



SCQ 5« 



1 1' 
1 >' 
I 

I 

II' 
1 1< 



OSntmtt PACKETS 



000020 
020 
002 

000001 000000 
000000 000000 
COOOOl 000000 



1 1 
I 



i6ET OUST STATUS CO il W I B MCKCT 



GOUST: 



1«. 
.•m 20 
.•YTC 2 
.WORD 1.0 
0.0 

OP.GOS.O 



I PACKET LENSTH IN ITTCS 



inSGTYP • 1 (OATAGIIAN)! CNEU 
iCOHNECTXON 10 - 2 COUP) 
i C OIt WND REFERENCE NUNKR • I 

tOPGQOE • 1 CGET OUST STATUS) 



CNEOZTS • 0 




000000 
000000 
OOOOOS 000001 
040 040 



lt« 
I 



iCXECUTE LOCAL fHMXWAH COMHANO PACKET 



I 



040 



.yoRO 

.eYTE 
.BYTE 

EXELOC: .UORO 
.UORO 
.UORO 

TSTNAN: .ASCII 



le. 

20 
2 

2.0 

0.0 

OP.ELP.l 

/ / 



{PACKET LENGTH IN |YTfS 



iNSCTYP > 1 COATAGiAH)} CRtOITI 
I CONNECTION 10-2 (MF) 
iCOMNANO REFERENCE NUNiCR • 2 

lOPCOOE • 3 (EXECUTE LXAL PROGRAM) 
I LOCAL PROGRAH NANC (FILLCO ATTflf) 




000024 
000 

OOOOol 000000 

000000 000000 

OOOOOS 000000 

000X94 000000 

OMCOO 000000 



I 



t RECEIVE OATA COHHANO PACKET 



1 

ii< 



.WORD 
.B^TE 
.BYTE 
ftCVOAT: .UORO 
.UORO 
.UORO 
.UORO 
.UORO 



20. 

0 

2 

5.0 

OP.REC.O 

U0..0 

ROBUF.O 



I PACKET LENGTH IN BYTES 

iHSGTYP » 0 (SEQUENTIAL) I CREDITS • 0 

.COMCCTION 10-2 (OUP) 

iCOttMND REFERENCE NUMBER - 9 

iOf>C00C • 5 (RECEIVE OATA) 
iBUFFER SIZE IN BYTES 
i BUFFER AOORESS 
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GLOBAL DATA SECTION 



1483 
1484 
1485 
1486 
1487 
1488 
1489 
1490 
1491 
1492 
149S 
1494 
1495 



I i< 



t ABORT COrtlANO PACKET 



002462 000014 

002464 020 

002465 002 

002466 000004 000000 
002472 000000 000000 
002476 000006 000000 



t i' 



ABORT; 



.WORD 
.BYTE 
• BYTE 
.UORO 
.WORD 
.WORD 



12. 

20 

2 

4.0 
0.0 

OP.ABT.O 



{PACKET LENGTH IN BYTES 
tHSGTYP - 1 (OATAGRAH)i CREDITS - 0 
iCONNECTION ID - 2 (DUP) 
tCOnriANO REFERENCE NUNBER > 4 

J OPCODE - 6 ( ABORT 1 



GL08At AREAS MACRO V0S.03 
GLOeAL DATA SECTION 

1497 
1498 
1499 
1500 
1501 
1502 
1503 
1504 

1505 002502 

1506 002506 
1507 

150S 
1509 
1510 
1511 
1512 
1513 
1514 
1515 
1516 

1517 002712 
151S 002716 

1519 002716 

1520 002726 

1521 002736 
1522 

1523 
1524 
1525 
1526 
1527 
1528 
1529 
1530 
1531 

1532 002736 000000 

1533 002740 000000 

1534 002742 000000 

1535 002744 000000 

1536 002746 000000 

1537 002750 

1538 022750 000000 

1539 022752 000000 
1540 

1541 
1542 
1543 
1544 
1545 
1546 
1547 
1548 
1549 

1550 0227S4 
1551 
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I CLASS DRIVER BUFFERS 
i 

• {«***••♦•»••***•♦♦•♦****♦♦*•****♦•♦***♦♦♦♦♦**♦•*•♦♦♦•*♦♦♦♦•••♦•• 

RESPBF:: .BLKU 2. iTGP 4 LOCATIONS OF RESPONSE BUFFER 

RSPBUF:: .BLKU 66. t DRIVER RESPONSE BUFFER 

1 1 *************************************************************** 

!u/a PORT DESCRIPTOR RINGS 
t 

; 'A************************************************************** 



SEQ 41 



OSCRNG 
RSPENO 
RSPRNG 
CMDRNG 
DSCEND 



.BLKU 2. ;0ESCRIPT0R RING 

J END OF RESPONSE BUFFER 
.BLKU 4. s RESPONSE DESCRIPTOR RING 

.BLKU 4. sCONNAND DESCRIPTOR RING 

>END OF DESCRIPTOR RING 



. *************************************************************** 

CLASS AND PORT DRIVER VARIABLES 

I *************************************************************** 



CNTHI: 
CNTFLG 
PCKSIZ 
CMDREF 
CMDCNT 
URBUF: 
CMOSAV 
RSPSAV 



.UORO 0 {VALUE OF THE HIGH TIMEOUT 

.UORD 0 : CONTROLLER FLAGS 

.UORD 0 : PACKET SIZE IN BYTES 

.UORD 0 {COMMAND REFERENCE NUMBER 

.UORD 0 {COMMAND C0U>4T 

.BLKU 4096. lURITE BUFFER 

.UORD 0 iCOmANO DESCRIPTOR SAVE 

.UORD 0 {RESPONSE DESCRIPTOR SAVE 



**************************************************************** 

MANUAL INTERVENTION INPUT DATA TABLE 



MANT6L : 



.BLKB 3 
.EVEN 



jTUO BYTES OF INPUT. 3RD BYTE ZERO 
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GLOBAL DATA SECTION 



40 



SEQ 42 



1S53 
1554 
1555 
1556 
1557 
1558 
1559 
1563 

1564 022760 
022760 

1565 022760 

1566 022762 

1567 022764 
1568 

1569 022766 
1570 



PROTECTION TABLE 



000000 
177777 
177777 



BGNPROT 
LIPROT:: 



ENOPROT 



.UORO 0 
.UORO -1 
.UORO -1 
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GLOBAL TEXT SECTION 

1572 .SBTTL GLOBAL TEXT SECTION 

1576 .,•••*••••••••*••••••••••••••••••••••••»»••••••••♦»»»••••♦♦*»•♦•• 

1577 ,,•»»••••.•••••••*•.••••••••••»•••••••••*•••••••••••••••••••••••• 

1578 J 

1579 ! THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS. 

1580 > MESSAGES. AND ASCII INFORMATION THAT ARE USED IN 

1581 i MORE THAN ONE TEST. 

1582 i 

1585 J ! ••••*••••••••••*••••••••••••*••••*•••♦•*♦•*••••••♦♦*•••♦••••••• 

1584 ; J *************************************************************** 

1585 
1586 

1587 ; J *♦*♦♦•♦••******•***»*•****•♦*♦•♦♦*♦•**••••••••••••*••••••••••** 

1588 > 

1589 ; NAMES OF DEVICES SUPPORTED BY PROGRAM 

1590 t 

1591 • I ************** ************************************************ 

1595 

1596 022766 DEVTYP <TU81> 

022766 LtDVTYP:: 

022766 124 125 070 .ASCIZ «TU81K 

.EVEU 

1597 



SEC 43 
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GLOBAL TFXT SECTION 



SCO 44 



1602 
1603 
1604 

1605 
1606 
1607 
1608 
1604 
1610 
1611 
1612 
1613 
1614 
1615 
i.616 
1617 
1616 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
16S4 
1635 
1636 
1637 
1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 



022774 
023030 
023110 
023140 
023203 
023260 
023323 



023350 



023414 
023436 

023500 
023520 
023543 
023627 
023653 
023706 
023734 
023755 
023775 
024026 
024047 
024066 



024140 
024161 
024212 
024233 
024271 
024316 
024344 
024405 
024454 
024503 
024532 
024567 
024637 
024701 
024743 



sFORIAT STATErtENTS 



045 


101 


111 


LINEl 




.ASCIZ 


04$ 


1 16 

A 4V 


045 


LINE2 




' ■5CT7 


045 


116 


045 


LINE3 




ASCIZ 


045 


116 


062 


LINE4 




ASCIZ 




X vx 




LINES 




ASCIZ 


045 


116 


045 


LINE6 




ASCIZ 


045 


101 


120 


LINE7 




. ASCIZ 












.EVEN 


045 


116 


045 


URl: : 




.ASCIZ 












.EVEN 


045 


116 


062 


PKSENT 


: .ASCIZ 


045 


116 


045 


CREFNO 


: .ASCIZ 


045 


116 


045 


OPCODE 


: .ASCIZ 


045 


116 


045 


MODIFY 


: .ASCIZ 


045 


116 


045 


PRGNAn 


:. ASCIZ 


045 


116 


045 


BYTCNT 


: .ASCIZ 


045 


116 


045 


BUFDES 


: .ASCIZ 


045 


116 


062 


PKRECV 


: .ASCIZ 


045 


116 


045 


ENCODE 


■ : .ASCIZ 


045 


116 


045 


STATUS 


: .ASCIZ 


043 


116 


045 


PRGVER 


• : .ASCIZ 


045 


116 


045 


TIMOUT 


•!. ASCIZ 


045 


116 


045 


FLAGS: 


.ASCIZ 


045 


116 


045 


FAULTC 


::. ASCIZ 












.EVEN 



?tfAINIT SEQUENCE STEP *: «01? 

TtfNKASA REG: «06tfA EXPCTO: «06«A ACTUAL SA: «067 
?«Ni(AIP REG ADDRESS: •06? 
?tfN2tfA****FAILING FRU: itT«A****«N«N? 
7KAREL0CATI0N CONSTANT: M)6«A VIRT. ADD: 
?tfN)tAEXPECTEO: tfOenA RECEIVED: «06? 
?ltAPHYSICAL ADO: «06? 



«067 



7i(N«ASA REG: SA CONTENTS: «06? 



?«N2ilAPACKET SENT:? 

?«NitACOMHAND REFERENCE NUMBER: «06? 

?«N)(A0PC0DE: «03? 

?tfN«AnOOIFIERS: «06? 

7«N)(APR0GRAn NAME: it03i(A «03i(A i(03»A il03ilA «03itA HOS? 

?«N«ABYTE COUNT: «067 

?itNKA6UFFER DESCRIPTOR: #06? 

?*N2*APACKET RECEIVED:? 

?«N«AEN0C0DE : tf037 

?i(NitASTATUS : «06? 

?i»N*APR06RAM VERSION: 1*06? 

?«WATinE0UT: «03? 

7WMAFLAGS: HOS? 

7WWAFAULT CODE: SUB -FAULT CODE: ? 



! ERROR MESSAGES 
i 



116 


130 


115 


EMS65: 


: .ASCIZ 


7NXH ON READ TUIP? 


124 


125 


111 


EMSGe : 


.ASCIZ 


?TUIP NOT 0 ON FIRST READ? 


116 


130 


115 


EMSG7: 


.ASCIZ 


7NXN ON READ TUSA? 


123 


101 


040 


ENSGS: 


: .ASCIZ 


?SA REG IN ERROR ON FIRST READ? 


123 


101 


040 


ENSG9: 


- .ASCIZ 


?SA CONTENTS IN ERROR? 


123 


101 


040 


EHSGIO 


: . ASCIZ 


7SA WRONG IN DATA WRAP? 


105 


130 


120 


EMSGll 


: .ASCIZ 


7EXPECTE0 INTERRUPT DID NOT OCCUR? 


111 


116 


124 


EnSG12 


: .ASCIZ 


7INTRRPT OCCURRED WITH CPU PRIORITY ■ 7? 


123 


101 


040 


EMSG13 


:. ASCIZ 


?SA NOT 0 IN PURGE/POLL? 


120 


125 


122 


EHSG14 


: .ASCIZ 


7PURGE/P0LL TEST FAILED? 


105 


130 


124 


EMSGIS 


:. ASCIZ 


7EXTEWE0 ADDRESS TEST FAILED? 


042 


105 


130 


EriSG16 


: .ASCIZ 


? "EXECUTE LOCAL PROGRAM" COMMAND TIMEOUT? 


042 


107 


105 


EriSG17 


: .ASCIZ 


7 "GET DUST STATUS" COMMAND TIMEOUT? 


042 


107 


105 


EHSGIS 


:. ASCIZ 


?"GET DUST STATUS" COMMAND FAILURE? 


042 


lOS 


130 


EnSG19 


:. ASCIZ 


7 "EXECUTE LOCAL PROGRAM" COMMAND FAILURE? 



GLOeM. AREAS MACRO V0S.03 U«4n««d«y 09-0et-8S 10:06 P*gc 42 1 
GLOBAL TEXT SECTION 



SEQ 45 



1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1663 
1684 
1685 
1686 
1687 
1688 
1689 
1690 
1691 
X692 
1693 
1694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703 



025013 
025052 
025104 
025135 
025215 



025250 
025302 
025S23 
025351 
025375 
025452 
025534 



025632 
025647 
025670 
025716 



025724 
026032 
026057 
026134 
026221 
026324 
026430 
026536 
026646 
026716 



042 

101 
111 
111 
111 



124 

120 
124 
120 
111 
045 
045 



114 
103 
114 
104 



045 
045 
045 
045 
045 
045 
045 
045 
105 
111 



122 
102 
116 
116 
116 



111 
117 
115 
117 
116 
116 
116 



105 
117 
105 
122 



116 
116 
116 
116 
116 
116 
116 
116 
156 
163 



105 
117 
124 
126 
124 



115 
122 
123 
122 
103 
045 
045 



123 
11» 
123 
111 



045 
062 
045 
045 
045 
045 
045 
062 
164 
040 



EHSG20 
Ef1SG21 
EnSG22 
PriSG23 
EnSG24 



URERl 
URER2 
URER3 
WRER4 
URERS 
URER6 
yRER7 



.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.EVEN 

.ASCIZ 
.ASCIZ 
. ASCIZ 
. ASCIZ 
.ASCIZ 
.ASCIZ 
.ASCIZ 
.EVEN 



? -RECEIVE DATA- COMHAN0 FAILURE? 
7A80RT COmANOS DON'T WORK? 
7INTERNAL DRIVE TEST HUNG? 

7INVALI0 MESSAGE NUMBER FROM INTERNAL DRIVE TEST? 
7INTERNAL DRIVE TcST FAILED? 

7TIME OUT DURING PORT INIT7 
?PORT INIT FAILED? 
7TMSCP COMMAND FAILURE? 
?P0RT DETECTED ERROR? 

7INC0RRECT COMMAND REFERENCE NUMBER RECEIVED.? 
7M4KAREFER TO PATHFINDER FOR EXPLANATION OF COOCS.? 
7KNIIARECEIVED INVALID MESSAGE NUMBER FROM INTERNAL DRIVE TEST. 



(MISCELLANEOUS ERROR MESSAGES 
I 

t 1***************************4 



LESI 
CTRL 
LSCT 
DRVE 



.ASCIZ 7LESI ADAPTER? 

.ASCIZ 7CONTROLLER/CABLE7 

.ASCIZ 7LESI/C0NTR0LLER/CABLE? 

.ASCIZ 70RIVE? 
.EVEN 



1 1 *************************************************************** 

i 



(MANUAL TEST MESSAGES 

i 

1 1 **♦**•*********•***< 



TlOMSl 
T10MS2 
T10MS3 
T10MS4 
TllMSl 
T12MS1 
T13MS1 
MMS6:: 
SELTST 
QUESTN 



:. ASCIZ \«NKAT««t 10: FUNCTIONAL FAULT DETECTION TEST (Drive Resident T««t 

:. ASCIZ \KN2KA*** CAUTION ***\ 

:. ASCIZ \KNKAThi9 test Mill destroy th« data on tap«.\ 

ASCIZ \KNtfAMount a scratch tap* UNTENSIONEO but THREADED. KN\ 

:. ASCIZ \KNKAT«st 11: TENSION FAULT ISOLATION TEST (Drive Resident Test *2)\ 

:. ASCIZ \«NKATest 12: VELOCITY FAU.T ISOLATION TEST (Drive Resident Test «3)\ 

:. ASCIZ XKNKATest 13: SELECT A DRIVE RESIDENT TEST (Drive Resident Tests l-99)\ 

ASCIZ \KN2itA*** REFER TO PATHFINDER FOR TEST REQUIREMENTS BEFORE PROCEDING •**\ 

:. ASCIZ \Enter drive resident test number (l-99)\ 

:. ASCIZ Ms the drive ready (To bypass this test hit return )\ 
.EVEN 



GL08AL AREAS MACRO V0S.03 
GLOBAL ERROR REPORT SECTION 



U«dn«sd«y 09-0ct-85 10:06 Pag* 43 



SEQ 46 



1705 
1709 
1710 
1711 
1712 
171S 
1714 
1715 
1716 
1717 
1718 
1719 
1723 
1724 
1725 
1726 
1727 



.SBTTL GLOBAL ERROR REPORT SECTION 



172S 
1729 
1730 



1731 
1732 
1733 
1734 



1735 
1736 
1737 
1738 



1739 
1740 



027002 

027002 
027002 
027002 
027006 
027012 
0270i'v 
027020 
027022 

027026 
027026 
027026 
027032 
027036 
027042 
027046 
027052 
027054 
027056 
027062 

027066 
027066 
027066 
027070 
027074 
027100 
027102 
027104 
027110 

027114 
027114 
027114 
027116 
027122 
027126 
027132 
027134 
027136 

027142 



013746 
012746 
C12746 
010600 
104415 
062706 



016446 
013746 
016446 
012746 
012746 
010600 
104415 
062706 
000137 



010246 
012746 
012746 
010600 
104415 
062706 
000137 



010246 
013746 
012746 
012746 
010600 
104415 
062706 



002336 
022774 
000002 



000006 



000012 
002334 
000002 
023030 
000004 



000012 
030624 



023523 
000002 



000006 
027142 



172346 
023203 
000003 



000010 



: GLOBAL ERROR REPORT'o 

: THE GLOBAL ERROR REPORT SECTION CONTAINS THE PRINTS 

AND PRINTX CALLS THAT ARE USED IN MORE THAN ONE TEST. 
IT ALSO INCLUDES THE ASCII MESSAGES THAT ARE USED BY 
THE PRINTS ANO PRINTX CALLS. 



i 
; 
; 
I 



PRIINI: 



PRISA: 



PRIPAD: 



PRIVAD: 



BGNHSG 



PRINTX 

NOV 

MOV 

MOV 

MOV 

TRAP 

ADO 



PRINTX 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

JMP 



PRINTX 

MOV 

MOV 

MOV 

MOV 

TRAP 

AOO 

JMP 



PRINTX 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



«LINE1.INISTP 

INISTP.-(SP) 

♦LINEl.-CSP) 

♦2,-(SP) 

SP.RO 

CIPNTX 

«6.SP 



«LINE2 . TUSAC R4 ) . SAEXP . TUSASVC R4 ) 

TUSASV(R4),-(SP) 

SAEX'-.-(SP) 

TUSA(R4).-(SP) 

♦LI^«2.-CSP) 

M.-(SP) 

SP.RO 

CIPNTX 

•12. SP 

FRUERR 



*LINE7.R2 

R2.-(SP) 

♦LINE7.-(SP) 

•2.-CSP) 

SP.RO 

CIPNTX 

«6.SP 

PRIOAT 



•LINES. KPAR3.R2 

R2.-(SP) 

KPAR3.-(SP) 

♦LINES. -(SP) 

#3.-(SP1 

SP.RO 

C»PNTX 

♦10. SP 



PRIOAT: 



GLOBAL AREAS MACRO V0S.03 
GLOBAL ERROR REPORT SE:TI0N 



U«dn««day 09-0ct-65 10:06 Pag* 43-1 



1741 



1742 
1743 
1744 
1745 



027142 
027142 
027144 
027146 
027152 
027156 
027160 
027162 
027166 



027172 
027172 
027172 
027176 
027202 
027206 
027210 
027212 
1746 027216 
1747 

1746 027222 
1749 027222 
1750 
1751 



011246 
010146 
012746 
012746 
010600 
104415 
062706 
000137 



016446 
012746 
012746 
010600 
104415 
062706 
000137 



023260 
000003 



000010 
030624 



000000 
023110 
000002 



000006 
030624 



000137 030624 



1752 


027226 






1753 


027226 








027226 


013746 


002336 




027232 


012746 


022774 




027236 


012746 


000002 




027242 


010600 






027244 


104415 






027246 


062706 


000006 


1754 








1755 


027252 






1756 


027252 








027252 


016446 


000012 




027256 


016446 


000002 




027262 


012746 


023350 




027266 


012746 


000003 




027272 


010600 






027274 


104415 






027276 


062706 


000010 


1757 


027302 


000137 


030624 


1756 








1759 


027306 






1760 


027306 








027306 


012746 


023414 




027312 


012746 


000001 




027316 


010600 






027320 


104414 






027322 


062706 


000004 


1761 


027326 
027326 


011546 






027330 


012746 


023436 




027334 


012746 


000002 




027340 


010600 






027342 


104414 





PRIIP: ; 



PRINTX 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

JMP 



PRINTX 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

JMP 



PRIIERR: 



URINTO: 



URPRTE: 



ELPERR: 



JMP 



PRINTX 

MOV 

MOV 

tlOV 

MOV 

TRAP 

ADD 



PRINTX 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

JMP 



PRINTS 

MOV 

MOV 

MOV 

TRAP 

ADD 

PRINTS 

MOV 

MOV 

MOV 

MOV 

TRAP 



•LINE6.R1.(R2) 

(R2).-(SP) 

Rl.-(SP) 

♦LINe6,-(SP) 

♦3.-(SP) 

SP.RO 

C»PNTX 

♦10. SP 

FRUERR 



♦LINE3.TUIP(R4) 

TUIP(R4).-CSP) 

#HNE3.-(SP) 

♦2.-(SP) 

SP.RO 

CIPNTX 

♦6,SP 

FRUERR 



FRUERR 



♦LINEl.INISTP 

INISTP.-(SP) 

♦LINEl.-CSP) 

♦2,-CSP) 

SP.RO 

CIPNTX 

♦6.SP 



«UR1 . TUSA(R4 ) . TUSASVCR4 ) 

TUSASVCR4).-(SP) 

TUSA(R4).-(SP) 

#WR1.-(SP} 

♦3.-(SP) 

SP.RO 

C»PNTX 

«10.SP 

FRUERR 



«PKSENT 

#PKSENT.-(SP) 

#1.-(SP) 

SP.RO 

C»PNTB 

♦4.SP 

*CREFN0.(R5) 

(R5).-(SP) 

«REFN0.-(SP) 

♦2.-(SP) 

SP.RO 

CtPNTB 



SEQ 47 



:C0MMAN0/RCjP0NSE PACKET PRINTOUT 



GLOBAL AREAS MACRO V0S.O3 U«dn«sday 09-0ct-6S 10:06 Pag* 43-2 SCO 4B 

CLOeAL ERROR REPORT SECTION 



027344 


062706 


000006 


ADO 


•6.SP 


1762 027350 






PRINTS 


MPCODE, <B.10CR5)> 


027350 


005046 




CLR 


-(SP) 


027352 


156516 


000010 


BISB 


10(R5),(SP) 


027356 


012746 


023500 


nov 


♦OPCODE. -(SP) 


027562 


012746 


000002 


nov 


♦2. -CSP) 


027366 


010600 




MOV 


SP.RO 


027370 


104414 




TRAP 


CIPNTS 


027372 


062706 


000006 


ADO 


•6,SP 


1763 027376 






AA vat 

PRINTS 


AMAAVPw a A^ BK X 

•MODIFY . 12( R5 ) 


027376 


016546 


000012 


nov 


12CR5) , -CSP) 


027402 


012746 


023520 


MOV 


•MOOirY, -CSP) 


027406 


012746 


000002 


MOV 


♦2 , - ( SP ) 


027412 


010600 




MOV 


SP.RO 


0?7«14 


104414 




TRAP 


CIPNTS 


02 7416 


062706 


000006 


ADO 


CB 


1764 027422 


AA ■ V A 

PRINTS 


mnnr^a.! ^b «ii^BC'\«. «C^BC%«l «£^nC'\«L 17/' DC ^ ^ v D DC A v ^D ^ 4 ^ DC i ^ 

vPRGNAn. <B , 14(K5 J> « <B« 15CR3^> * <D« lo(K5i> • <D • 1 fKHo}> • <0 t^OvNd J> • <B«211N3 J> 


027422 


005046 




CLR 


^ ^B X 

-CSP) 


027424 


156516 


000021 


BISB 


^lCR5).CSr} 


027430 


C05046 




CLR 


-CSP) 


027432 
027436 


156516 


000020 


BISB 


20C R5 ) . C Sr } 


005046 




CLR 


-C5P) 


027440 


156516 


000017 


BISB 


l»CR5),CSr) 


027444 


005046 




CLR 


-CSP J 


027446 


156516 


000016 


DTCD 
BISB 




027452 


005046 




CLR 


f CO \ 


027454 


156516 


000015 


BISB 


fC^DC^ ^ CO ^ 


027460 


005046 




CLH 


t CD ^ 

-C SP i 


027462 


156516 


A AAA a M 

000014 


BISB 


i^^oc% ^ CO ^ 
14(R3},CSP J 


027466 


012746 


023543 


MOV 


AODr*UAM ^ CO ^ 


027472 


012746 


000007 


MOV 


A7 ^ CO S 

•7 . - 1 SP J 


027476 


010600 




nov 


CO on 


027500 


104414 




TRUr 


r**OuTD 
CfPNID 


027502 


062706 


A AAA AA 

000020 


Ann 


CO 

•20, SP 


1765 027506 




OOTklTD 

rKXNiD 


WKKCUV 


027506 


012746 


023706 


MOV 


ADI#DCf*t/ ^ CO \ 

•PKREC V , - C SP I 


027512 


012746 


000001 


MOV 


Al ^CO^ 


027516 


010600 




MOV 


CO on 


027520 


104414 




TRHK 


<0&ITO 

V.*PNI B 


027522 


062706 


AAA AAA 

000004 


Ann 


CO 

•a . 5P 


1766 027526 




DD TMTQ 
rKXN 1 D 


VLKtr NUi I J 


027526 


011346 




nov 


^OV^ ^CD^ 


027530 


012746 


023436 


unu 

nov 




027534 


012746 


000002 


nov 


^ CD ^ 

•2 . - 1 aP J 


027540 


010600 




nov 


CO OA 








TRAP 


CtPNTB 


027544 


062706 


000006 


ADD 


#6,SP 


1767 027550 




PRINTS 


•ENCODE. <B.10CRS)> 


027550 


005046 




CLR 


-CSP) 


027552 


156316 


000010 


BISB 


10CR3).(SP) 


027556 


012746 


02S7S4 


MOV 


•ENCODE. -CSP) 


027562 


012746 


000002 


MOV 


•2, -CSP) 


027566 


010600 




MOV 


SP.RO 


027570 


104414 




TRAP 


CIPNTS 


027572 


062706 


000006 


ADD 


06 SP 


1766 027576 






PRINTS 


•sfATUS.12(R3) 


027576 


016346 


000012 


nov 


12(RS).-(SP) 



GLOeAL AREAS HACRO V0S.03 
GLOBAL ERROR REPORT SECTION 



U*dn«sday 09-0ct-85 10:06 Pag* 43-3 



SEQ 49 





027602 


012746 


U23 r33 




027606 


012746 


000002 




027612 


OlOoOO 






027614 


104414 






027616 


062706 


OOQvOo 


1769 


027o22 






027622 


0X0940 


AAAAI A 
UUVUX^ 




027626 


At 07AA 
OXc '40 


AOT77*t 




/\97AVO 

027OAZ 


t\\ 97AiL 
OXc '40 


UWVVC 




027636 


010600 






0270#0 








027642 






1770 


027o*O 

02 f 








Ue f 03U 




VvWX^ 




Oc r034 








027000 








02 » OO* 








rOOO 








A07&7n 
Uc 'O f U 




WVVvw 


1 r ' 1 


Uc fO '* 
Oc 'O »* 








vc rO 'O 


X700XD 


vwvxo 






wXc 






AO770A 
Vc > r VO 


UXC f 


000002 




Vc ' ' Xc 


VXvOW 






027714 


104414 






A0771 
UC ' ' XO 


VOc « WD 




1 ' 'C 


A07700 

Uc r r cc 


AAA1 X7 
WvXd ' 












Iff* 


Vc r r cO 






1 TJK 


Uc • 'cO 








Uc ' 'cO 


UXC r 






027732 


012746 


000001 




wc • ' AO 


A* AAA A 






n977An 

Uc ' 


XW**X* 






A977A9 
Oc r '^C 


UOc rUD 


1 f rO 


A977A41 

o« • f *o 

Uc ■ r *0 


ux x^^o 






ft977^rt 
Uc ' r 3v 


vXC ' *D 


vc v*dO 




Uc ' r J* 


VXc r*0 


vvvwc 




A977im 
Uc ' r OU 


vXvOW 






A077419 
Uc ' 'Oc 


XU*4X* 






A977^A 
Uc ' r O* 


vOc 'VD 


VWWw 


1 777 


rt9777rt 
Uc » » »U 

027770 


005046 






027772 


156S16 


000010 




027776 


012746 


023500 




030002 


012746 


000002 




030006 


010600 






030010 


104414 






030012 


062706 


000006 


1778 


030016 








0S0016 


016546 


000012 




030022 


012746 


023520 




030026 


012746 


000002 




030032 


010600 





nuv 




MAU 

nuv 


*o f CD ^ 


MAU 

nuv 


CD DA 


TOAD 


L VKN Id 


AAA 

nUU 


ML CD 


DDTUTB 


WKoVtH » X^l.K3 J 


MAU 

nuv 




MAU 

nuv 


AODI^UCD f CD % 


nuv 


wc f - 1, or } 


MAW 

nuv 


CD DA 
or » KU 


TDAD 


r ftDUTQ 
C fKM 1 D 


AAA 
HUU 


CD 


DDTklTD 


AT THAI IT 1^rQT'^> 




CO ^ 
•"V Or J 


DXoD 


X3^ n3 J t V J 


MAU 

nuv 


F 1 xnuv 1 ■ " V Or 3 


MAU 

nuv 


. ^ CP S 


NOV 


^ RO 


TRAP 


r*?NTB 


ADD 


«6.SP 


PRINTB 


•FLAGS. <B.16(R3)> 


CLR 


-(SP) 


BISB 


16CR3).(SP) 


riov 


•FLAGS. -(SP) 


NOV 


♦2.-(SP) 


NOV 


SP.RO 


TRAP 


CIPNTB 


ADO 


•6.SP 


JMP 


FRUERR 



RCVERRi 



PRINTB 


•PKSENT 


nov 


•PKSENT.-(SP) 


MOV 


•l.-(SP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADD 


•4.5P 


PRINTB 


•CREFNO.CftS) 


MOV 


(R5).-CSP) 


MOV 


•CREFNO..(SP) 


MOV 


♦2.-(SP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADD 


•6 SP 


PRINTB 


•OPCODE. <B.10(RS)> 


CLR 


-(SP) 


BISB 


10(R5).(SP) 


MOV 


•OPCODE. -(SP) 


MOV 


•2.-(SP) 


MOV 


SP.RO 


TRAP 


CIPNTB 


ADO 


•6 SP 


PRINTB 


♦MODIFY. 12(R5) 


MOV 


12(R5).-(SP) 


MOV 


•MODIFY. -(SP) 


MOV 


•2.-(SP) 


MOV 


SP.RO 



s COMMAND/RESPONSE PACKET PRINTOUT 



I 



CLOBM. AREAS MACRO V05.03 
GCOBAL ERROR REPORT SECTION 
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SEQ SO 





030054 


104414 




030036 


062706 


1779 


030042 






030042 


016S46 




030046 


012746 




030092 


A« ^^AA 

012746 




0300 S6 


010600 




030060 


104414 




AAA 

030062 


062706 


1780 


030066 






030066 


Al AC^A 




09W/72 


A« 




0*0076 


A1 97 AX. 

O127#o 




090102 


A1 AA^IA 
OlOOOU 






1 AAA1 A 

io**i* 




AVAl A^ 


^^97iW 


1701 


03V112 






030112 


A1 97 AA 
012 r#0 




owiie 


A1 97AA 

Olc f^O 




A^Af 99 


Al AAAA 






lO**l* 




A«A| 9< 


UDc r WO 


t YAO 

IToH 


0301*c 






A VA t V3 


Al 1 XAA 






Al OTAti 
Olc r^O 




AVA1 A A 
0»wl*w 


Al 37AA 




AVA 1 AA 


Al AAAA 




AVA1 AA 


1 AAA1 A 
lO*^l^ 




AVA1 ftA 


AA97AA 


1 '03 


0*0&3# 




o*wis* 


AA^AAH 




0*0190 


190*10 




AVA1 


Al 97AA 
Olc 




AVA4 


Al 97AA 
Olc f^O 




AVA4 79 
0*01 f C 


Al AAAA 




0*V1 f * 


1 AAAl A 
lO**l* 




AVAI 7A 
0901 rO 


^A97AA 
OOc rUO 


I torn 


AVA9A9 
0*UcUC 






ATASkAO 
0*OcUc 


Al AHAA 




f\Xf\^f%A 

o*w*up 


Al 37AA 
UlC r 




0*Ocle 


Al 07AA 
Ulc 




o*ocio 


Al AAAA 




AXA93A 


1 AAAt A 




AHA^^O 

0*02<c 


AA37AA 


1 

1 f 03 


0*OscD 






OS0326 






050232 


012746 




0S02S6 


012746 




030242 


010600 




030244 


104414 




0S0246 


062706 


1786 


030252 


0001S7 


1787 






1788 


0302S6 




178« 


0302S6 






O302'S6 


012746 




030262 


012746 





TOAD 


Lf KrI f Q 


000006 


Ann 






PRINTo 




/\A/\A« A 

000014 


nuv 


%Af DC ^ f CD % 


A9VX 97 

02*627 


nuv 


•HT 1 UNI « -I J 


000002 


nuv 


AO CD S 




fWV 


CD DA 








AAAAAA 
OOOOOO 




AJL CO 








AAAA 9 A 
OOOOcO 


nuv 


Of\f ^ . f CD ^ 
<Ul KD J f • I 9" J 


Oc*03* 


nuv 




^MAAA9 

000002 


nuv 


AO f CD S 




nuv 


CD OA 






riPMTR 
U f~lV 1 D 


A^^^^nA 
UOOOVD 


Ann 


Ml QP 




DDTMTQ 


ADirocru 


A9V7AA 
UC* IvO 


MOW 

nu» 


ADfefOPrw -fOD^ 
WMftl» V • ■ ^ 3r ^ 


AAAAA1 
OOOOOl 


nuv 


Al .rCOS 




MOW 

nuv 


CD on 




TOAD 


^ Vr n 1 D 


AAAAAA 


Ann 


AA CP 






v^nc.r nu • V u / 




Mnu 
nuv 




Vc*^*0 


Mnv 
nuv 




AAAAA9 


NOV 
nwv 


Ap * r CP S 




Mnv 

nuv 


CP on 




TOAP 


rftPMTR 
U wrwM 1 D 


OWWO 


Ann 


#6 5P 




PBTNTR 






CLR 


-(SP) 


AAAAf n 
OvOVlU 






023754 






UUUWc 


Mnv 


•C # \ 7 




Mnv 


SP.RO 




TRAP 




uvuwt> 


nuw 


«6 SP 






v9 1 n 1 III* » xc\ no y 


UOUUlc 


nuv 




Uc* 




•STATUS -(SPl 


000002 


nov 


#2.-CSP) 




NOV 
TRAP 


SP.RO 
CIPNTB 


000006 


ADO 


#6 SP 


PRINTS 


•BYTCNT,14CR5) 


000014 


NOV 


14CR5),-CSP) 
«eYTCNT.-CSP) 


025627 


NOV 


000002 


NOV 


♦2.-CSP) 




NOV 


SP.RO 




TRAP 


OPNTB 


000006 


AOO 


46. SP 


030624 


JNP 


FRUERR 



GDSERR: 



023414 

OOOOOl 



PRINTB 

NOV 

NOV 



4PKSENT 

iPKSCHT.-CSP) 

•l.-CSP) 



:CONNANO/RESPONSE PACKET PRINTOUT 



GLOBAL ERROR RCRORT SCCTZON 



050270 
030272 

1790 03O27« 
09027« 
030100 
0SO9O4 
030310 
030312 
030314 

1791 030320 
030320 
030^2 
030IM 
0|0i|2 

oioiM 

030342 

1792 03034« 
03034« 
030352 

oiosM 

0|0I«2 
0i0}64 

1793 010372 
030372 
030S7« 
010402 
030404 
0i040« 

1794 030412 
)i0412 



179S 01 

o! 
o| 

03 
0$0452 
0S04S4 
030456 

179« 030442 
0S04«2 
030446 
030472 
03047* 
030900 
030902 

1797 030504 

oscno* 

030510 
030514 




010400 
104414 
0*2706 

01.546 
012746 
012746 
010600 
104^14 
062706 

009046 
156516 
012746 
012746 
010600 
104414 
062706 

C 16546 
012746 
012746 
010600 
104414 
062706 

012746 
012746 
010600 
104414 
062706 

011346 
012746 
012746 
010600 
104414 
062706 

005046 
156316 
012746 
012746 
010600 
104414 
062706 

016346 
012746 
012746 
010600 
104414 
062706 

005046 
156316 
«12746 



023436 
000002 



000006 



000010 
023500 
000002 



000006 

000012 
023520 
000002 



000006 

023706 
000001 



000004 



023436 
000002 



000010 
023734 

000002 



000006 

000012 
0^3755 
000002 



000006 



000017 
024047 
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SEQ 51 



TMP 
400 

ncv 



nam 
tw 

TMP 
400 

RKINTB 

CLR 

BIS8 

nov 
nov 
nov 

TR4P 
400 

PRINTB 
NOV 

nov 

nov 
nov 

TRAP 
400 

PRINTB 

nov 
nov 
nov 

TRAP 
400 

PRINTB 

nov 

nov 

MOV 

nov 

TRAP 

AOO 

PRINTS 

aft 

6ISB 

nov 
nov 
nov 

TRAP 
AOO 

PRINTS 

nov 
nov 
nov 
nov 

TRAP 
AOO 

ntlNTB 

CLR 

BISB 

nov 



SP.M 

ctpwrre 

• 4,SP 

•CaCFMO.CIIS) 

C«I.-<SP) 

•aiEFNO.-(SP) 

«2.-(9) 

SP.M 

CtPNTB 

•6.SP 

«aPcaoc.<B.io(RS)> 

-(SP) 

10<«5).<SP) 

•OPCODE, -CSP) 

#2.-CSP) 

SP.RO 

CIPNTB 

•6,SP 

«N0DIFT.12(RS) 

12CR5).-(SP) 

•nOOIFY.-CSP) 

•2..(SP) 

SP.RO 

CIPNTB 

46. SP 

•PKRCCV 

♦PIO»ECV.-CSP) 

#1.-CSP) 

SP.RO 

C»PNTB 

•4.SP 

KREPNO.CRS) 

(R3).-(SP) 

»CR€FNO,-(SP) 

#2.-{SP) 

SP.RO 

CIPNTB 

46 SP 

«eNCooe.<s.io(R3}> 

-CSP) 

10(ftS).(SP} 

•CHCOOC.-CSR) 

♦2.-(SP> 

SP.RO 

CIPNTB 

46 SP 

♦STATUS. 12(R3) 

12(RS).-(SP) 

♦STATUS, -(SP) 

♦2. -CSP) 

SP.RO 

CIPNTB 

46 SP 

4rLACS.<6,17(R3)> 
-CSP) 

17(R5).(SP) 
•FLAGS. -CSP) 



r>4 oeAL emoR ACPOfrt section 



O9-Oct-05 10:06 Pi 
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09OS2O 


012746 


O0'>002 




030524 


010600 






030526 


104414 






030590 


062706 


000006 


1798 


0S0S34 


000197 


090624 


17*» 








190O 


090540 






1001 


090540 








0f0540 


012'46 








012 


000001 




030550 


010600 






030552 


« AA ^ 6 ii 

10441* 






090554 


062706 


000004 


1902 


A V A4LA /N 

050572 


At 

Wl« »•* 

104414 


OOOVOl 




090574 


062'' 06 


000004 


ISO^ 


030600 


C00197 


090624 


1804 








1909 


090604 






1906 


090604 








090604 


012746 


025594 




0)0610 


012746 


000001 




090614 


010600 






090916 


104414 






090620 


062706 


000004 



1907 
1909 
190« 
1910 



1911 
1912 



1813 
1914 



1915 



090624 
090624 
090624 
090990 
030694 
090640 
090642 
090644 

090650 
090950 
0906S2 

030654 
090654 
090654 



019746 002990 

012746 029140 

012746 000002 
010600 
104414 

062706 000006 



000167 
000000 



MOV 

TRAP 

900 



nrmsG: 



PRZNTB 

nov 
nov 
NOV 

nuip 

400 

PfUNTB 



XNVnSG: 



nov 

TRAP 
AOO 

jrf 



PRINTS 

MOV 

MOV 

MOV 

TR«> 

AOO 



FRICRR:; 

PRINTS 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 

PRIEX: EXIT 
.WORD 
.WORD 



104429 



L10009: 



ENOHSG 
TRAP 



«2.-(SP) 

SP.RO 

CfPNTB 

96.SP 

FRUBM 



•FAULTC 

•FAULTC.-fSP) 

•l.-CSP) 

SP.RO 

C9PNTB 

•4.SP 

«WRED6 

MIKR6.-CSP) 

•l.-(SP) 

SP.RO 

CtPNTB 

M.SP 

PRUERR 



4URER7 

«URER7.-(SP) 

#l.-(SP) 

SP.RO 

C»PNT8 

♦4.SP 



•CINE4.FRUIS 

PROIS.-(SP) 
4LINE4. -(SP) 
♦2.-(SP) 
SP.RO 

96. SP 

MSG 
JIJHP 
1.10003-2- . 



CIMSG 



SCO Sc' 



GLOBAL AREAS flACRO V05.03 
GLOBAL SUBROL'TINES SECTION 



1817 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
1830 
1631 
1832 
1833 
1854 
1035 
1836 
1837 
1836 
1839 
1840 
1841 
1842 
1843 
1844 
1645 
1846 
1647 
1648 
1652 
165S 
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.SBTTL GLOBAL SUBROUTINES SECTION 



SEQ S3 



1654 
1655 
1656 
1657 



1856 



0306S6 
030656 

030656 005237 002316 

030662 
030662 

030662 000002 



I , *************************************************************** 

! GLOBAL SUBROUTINES SECTION 

i THIS SECTION CONTAINS ALL SUBROUTINES AND 

I INTERRUPT SERVICE ROUTINES THAT ARE AC- 

I CESSED FROM ANYUHERE IN THE PROGRAH. 

i 

J **************************************************************** 
1 1 *************************************************************** 

, ,**********************«********************•******************* 

!tRAP4 

t THE ADDRESS OF THIS ROUTINE IS LOADED 

J INTO VECTOR 4 WHENEVER THE PROGRAM IS 

t ATTEMPTING TO ACCESS A PIECE OF HARDWARE 

I FOR THE FIRST TIME. IT IS INTENDED TO 

J CATCH NON-EXISTENT MEMORY TIMEOUTS IN 

; THE EVENT THE HARDWARE IS NOT REALLY PRE- 

j SENT OR IS MALFUNCTIONING. IT SIMPLY 

; SETS A FLAG. INDICATING THE TRAP OCCURRED. 

I 

i I *»»**•♦•*•♦♦»*»•••**♦♦*♦♦••♦••*•♦♦♦«******»*»»*»*****•♦♦»»•**** 



TRAP4!: 



L10004i 



BGNSRV TRAP4 

INC TRP4FG 

ENDSRV 

RTI 



sSET THE FLAG - TRAP OCCURRED 



GLOBAL AREAS MACRO V0S.03 
GLOBAL SUBAOt'TINES SECTION 



1663 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 
1878 
1879 
1883 
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SEQ 54 



INTRCV 



1884 
1885 
1886 
1687 
1888 
1889 
1890 
1891 
1692 
1893 



1694 



030664 
030664 



030664 052764 000002 000014 

0S0672 
030672 
030672 

030672 000002 



INFRCV: 

i 

■ 

> 

SI: 

EXTINT: 
L10005: 



THIS IS THE TU81 INTERRUPT HANDLER USED BY THE PRO- 
GRAM WHEN INTERRUPTS HAVE BEEN ENABLED. IF THE 
BRFALG IS CLEAR. TfC ROUTINE SETS A FLAG INDICATING 
THE EXPECTED INTERRUPT OCCURRED. IF BRFLAG IS SET, 
IT IWICATES THAT PROCESOR PRIORITY WAS SET TO A 
LEVEL THAT SHOULD HAVE INHIBITED THE INTERRUPT. SO 
THE ROUTINE SETS AN ERROR INDICATOR. 



BGNSRV INTRCV 



BIT 
BEQ 
MOV 
BR 

BIS 



ENOSRV 
RTI 



#BRFLAG.LUNFLG(R4) 

•DRPFLG.LUNFLGCR4) 
EXTINT 

♦INTFLG.LUNFLGCR4) 



sIF NOT PRIORITY LEVEL TESTING 
s THEN SKIP AROUND 
! ELSE SET FAILED BIT 
; RETURN 

iSET THE FLAG 



GLOBAL AREAS MACRO V05.03 
GLOBAL SUBROUTINES SECTION 



1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
190S 
1909 
1913 
1914 
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SLQ 55 



ILL INT 



1915 
1916 
1917 
1918 
1919 



1920 



030674 
030674 

030674 052764 000001 000014 



030702 
030702 

030702 000002 



ILLINT: 



L 10006: 



THIS HANDLER ROUTINE'S ADDRESS IS LOADED INTu THE 
CURRENT UUT'S VECTOR FOR ALL TESTS THAT 00 NOT EN- 
ABLE DEVICE INTERRUPTS. 



BGNSRV ILLINT 



BIS 



ENDSRV 
RTI 



*0RPFLG.LUNFLG(R4) 



GLOBAL HACRO V05.0S 

GLOBAL SUBROUTINES SECTION 

1925 
1926 
1927 
1928 
1929 
1930 
1931 
1932 
1933 
1934 
1935 
1936 
1940 



W«dnMd«y 09-0ct-85 10:06 Pag* 47 



SEQ 56 



sCHKCAC 



THIS ROUTINE IS USED IN THE DATA WRAP TEST TO CHECK IF 
CACHE HEMORY IS PRESENT AND ENABLED ON THE SYSTEM BEiMG 
TESTED. IF SO. CACHE IS DISABLED BEFORE PROCEEDING 
TO PREVENT THE TEST FROM INCORRECTLY REPORTING AN ERROR. 



{ I* 



1941 


030704 






1942 


030704 








030704 


012746 


OOOOOOG 




OWIO 


012746 


030656 




030714 


012746 


000004 




050720 


012746 


000003 




030724 


104437 






030726 


062706 


000010 


1943 


030732 


005037 


002362 


1944 


030736 


005737 


177746 


1945 


030742 


005737 


002316 


1946 


030746 


001005 




1947 


030750 


052737 


000014 177746 


194S 


030756 


005237 


002362 


1949 


030762 








030762 


012700 


000004 




030766 


104436 




1950 


0S0770 


005037 


002316 


1951 


030774 


000207 




1952 









CHKCAC: 



10>: 



SETVEC 


♦VEC4.#TRAP4.#PRI07 jSET UP FOR POSSIBLF ILLEGAL 


MOV 


•PRI07.-(SP) 




MOV 


*TRAP4. (SP) 




MOV 


♦VEC4,-CSP) 




MOV 


♦3.-CSP) 




TRAP 


C»SVEC 




ADO 


♦10. SP 




CLR 


CPFLA6 


CLEAR "CACHE PRESENT" FL*G 


TST 


CCR 


READ CACHE CONTROL REGISTER 


TST 


TRP4FG 


CACHE PRESENT ? 


BNE 


10* 


NO. BRANCH 


BIS 


MISCAC.CCR 


DISABLE CACHE 


INC 


CPFLAG 


SET "CACHE PRESENT" FLAG 


CLRVEC 


♦VEC4 


RESTORE VECTOR 


MOV 


♦VEC4.ro 




TRAP 


CICVEC 




CLR 


TRP4FG sMORE HOUSEKEEPING 


RTS 


PC 





GLOBAL AAEAS lACAO V05.03 
GLOBAL SUBROCTINES SECTION 

1957 
19SB 
1959 
1960 
1961 
1962 
1965 
1964 
1965 
1966 
1967 
1966 
1969 
1973 
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SEQ S7 



1 : ■ 
11' 



jKTTEST 



THIS SUBROUTINE IS USED BY THE INIT CODE TO 
DETERniNfc IF THE HEHORY HANAGCnENT UNIT IS 
PRESENT. IF SO. IT RETURNS A FLAG IN THE 
SET STATE. OTHERWISE THE FALG IS CLEAR IN 
UHICH CASE TEST SEVEN IS BYPASSED. 



1974 


030776 






KTTEST: : 




1975 


030776 






SETVEC 


*VEC4.«TRAP4 




050776 


012746 


000340 


NOV 


#PRI07,-(SP) 




031002 


012746 


030656 


MOV 


♦TRAP4.-(SP) 




031006 


012746 


000004 


MOV 


♦VEC4,-(SP) 




031012 


C 12746 


000003 


MOV 


♦3.-(SP) 




031016 


104437 




TRAP 


CISVEC 




031020 


062706 


000010 


ADD 


«10.SP 








X f f^f£ 


TCT 


■ ■« iwwnw 


1977 


031030 






DELAY 


1 




OSIOSO 


012727 


000001 


MOV 


♦l.CPO* 




031034 


000000 




.UORD 


0 




031036 


013727 


002116 


MOV 


LIDLY.CPO* 




031042 


000000 




.UORD 


0 




031044 


005367 


177772 


DEC 


-6(PC) 




031050 


001375 




BNE 


.-4 




031052 


005367 


177756 


DEC 


-22(PC) 




031056 


001367 




BNE 


.-20 


1978 












1979 


031060 


005737 


002316 


TST 


TRP4FG 


1960 


031064 


001026 




BNE 


NOKT 


1961 


031066 


005237 


002314 


INC 


KTFLAG 


1962 
1963 


031072 


005737 


172516 


TST 


MMUSR3 


1964 


031076 






DELAY 


1 




031076 


012727 


000001 


MOV 


•l.CPO* 




031102 


000000 




.WORD 


0 




0S1104 


013727 


002116 


MOV 


LIDLY.CPO* 




031110 


000000 




.WORD 


0 




031112 


005367 


177772 


DEC 


-6(PC) 




031116 


001375 




BNE 


.-4 




031120 


005367 


177756 


DEC 


-22(PC) 




031124 


001367 




BNE 


.20 


1965 
1966 


031126 


005737 


002316 


TST 


TRP4FG 


1967 


031132 


001005 




BNE 


KTEXT 


1988 


031134 


005237 


002314 


INC 


KTFLAG 


1969 


031140 


000402 




BR 


KTEXT 


1990 












1991 


031142 


005037 


002314 


NOKT : CLR 


KTFLAG 


1992 












1993 


031146 






KTEXT: CLRVEC 


•VEC4 




031146 


012700 


000004 


MOV 


•VEC4.ro 



J SET UP FOR POSSIBLE NXM 



5 ARE YOU THERE. MMU? 
:GIVE NXM TIMEOUT A CHANCE 



;IF NXM OCCURRED 

s THEN NO MMU IS PRESENT 

: ELSE SAY UE FOUND 18 BIT SO FAR 

:NOU LOOK FOR 22 BIT MAPPING 
.•GIVE NXM A CHANCE 



jIF NXM OCCURRED 
8 THEN 18 BIT IS ALL WE'VE GOT 
: ELSE SAY WE'VE GOT 22 BIT 
AND BRANCH AROUND NEXT 

NO MMU - CLEAR FLAG 

RESTORE VECTOR 
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CLOeAL SUBROt'TXNES SECTION 

031152 104456 TRAP CICVEC 

1994 031154 005037 002316 CLR TRP4FG iMORE HOUSEKEEPING 

1995 031160 000207 RTS PC 
1996 

1997 



GLOBAL AREAS MACRO V0S.03 
GLOBAL SUBROtTINES SECTION 



2002 
2005 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2021 
2022 
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SEQ S9 



2023 
2024 
2025 



031162 
031162 
031162 
031166 
031172 
031176 
031202 
031204 



012746 
C 12746 
016446 
012746 
104437 
062706 



000000 
030674 
000004 
0OCOO3 

000010 



RSTVEC 



RSTVEC: 



031210 000207 



THIS ROUTINE IS CALLED FROM VARIOUS PLACES 
IN THE PROGRAM TO SET THE UUT'S INTERRUPT 
VECTOR WITH THE ADDRESS OF A HANDLED ROUTINE 
WHICH MILL CATCH ILLEGAL DEVICE INTERRUPTS. 
SPECIFICALLY "ILLINT". INTERRUPT PRIORITY 
IS SET TO O. 



SETVEC TUVEC(R4).«LHNT.#PRI00 

MOV #PRIOO,-(SP) 

MOV OILLINT.-CSP) 

MOV TUVEC(R4),-CSP) 

MOV OS.-CSP) 

TRAP CfSVEC 

ADD «10.SP 

RTS PC 



GL08AL AREAS MACRO VOS.OS 
GLOBAL SUBROC'TINES SECTION 



2030 
2031 
2032 
2033 
2034 
2035 
2036 
2037 
2038 
2039 
2040 
2041 
2042 
2043 
2044 
2045 
2046 
2047 
2046 
2049 
2053 
2054 
2055 
2056 
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2057 
2058 
2059 



2060 
2061 
2062 
2063 



031212 
031212 
031220 
031222 
031222 
031226 
031232 
031236 
031242 
031244 
031250 

031252 
031252 
031256 
031262 
031266 
031272 
031274 



032764 
001014 

^ 2746 
012746 
016446 
012746 
104437 
062706 
000413 



012746 
012746 
016446 
012746 
104437 
062706 



031300 000207 



1 1< 



VECTOR 

THIS ROUTINE IS CALLED FROM VARIOUS PLACES 
IN THE PROGRAM TO SET THE UUT'S VECTOR WITH 
THE ADDRESS OF A HANDLER ROUTir« WHEN DEVICE 
INTERRUPTS HAVE BEEN ENABLED. THE ROUTINE HAS 
TUO MODES OF OPERATION: WHEN 8RFLAG IS CLEAR. 
PROCESSOR PRIORITY IS SET TO ZERO. ALLOWING 
DEVICE INTERRUPTS. IF BRFLAG IS SET. PRIORITY 
IS SET TO 7. IF AN INTERRUPT OCCURS IN THIS 
CASE. AN ERROR IS RETURNED BY THE HANDLER 
ROUTINE. "INTRCV". 

I •*•**•**********•••**••*•*•♦*»*****•**********•*•************•• 
I *************************************************************** 



000004 000014 



000000 
030664 
000004 
000003 



VECTOR: 



000010 



000340 
030664 
000004 
000003 

000010 



BIT •BRFLAG. LUNFLG(R4) ;IF FLAG IS SET 

BNE S« ; THEN SKIP TO SECOND HALF 

SETVEC TUVEC(R4).«NTRCV.#PRI00 jELSE LOU PRIORITY 

MOV •PRIOO.-CSP) 

MOV WNTRCV, -CSP) 

MOV TUVEC(R4J.-(SP) 

MOV W.-CSP) 

TRAP CISVEC 

ADD «10.SP 

BR EXTVEC : RETURN 



5t: 



MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

EXTVEC: RTS 



SETVEC TUVEC(R4).#INTRCV.«>RI07 



#PRI07.-(SP) 
♦INTR'*V, -CSP) 
TUVECIR4).-(SP) 
♦3. -CSP) 
CISVEC 
♦10. SP 

PC 



;HIGH PRIORITY 



GLOBAc AREAS HACftO V0S.03 
GLOBAL SUBROL'TINES SECTION 



2068 
2069 
2070 
2071 
2072 
207S 
2074 
2075 
2076 
2077 
2070 
2079 
2080 
2001 
2082 
2083 
2084 
2085 
2009 
2090 

2091 031302 

2092 031302 

2093 031306 

2094 031312 

2095 031314 

2096 031320 

2097 0313^2 

2098 031326 
2099 

2100 
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SEQ 61 



POELAY 



THIS ROUTINE IS USED THROUGHOUT THE PROGRAM TO PROVIDE 
A VARIABLE AMOUNT OF DELAY TIME. THE DELAY UILL BE 
INSTRUCTION EXECUTION TIME DEPENDENT. TUG VALUES MUST 
BE LOADED BY MAINLINE CODE PRIOR TO CALLING PDELAY: 
"INNER" AND "OUTER". IF SUFFICIENT CALLS TO PDELAY ARE 
MADE SUCH THAT THE OUTER COUNT IS EXHAUSTED. THE ROUTINE 
RETURNS "TOUT" EQUAL TO 1. INDICATING TIMEOUT HAS OCCURRED. 
"INNER" SHOULD BE RE-LOADED BY MAINLINE CODE, PRIOR TO 
CALL TO PDELAY WITHIN A TIMING LOOP. 



005037 002350 
005337 002344 
001373 

005337 002346 
001002 

005237 002350 
000207 



POELAY : : 

CLR 
DEC 
BNE 
DEC 
BNE 
INC 

PDLYEX: RTS 



TOUT 

INNER 

POELAY 

OUTER 

PDLYEX 

TOUT 

PC 



CLEAR TIMEOUT INDICATOR 
IF COUNT NOT EXHAUSTED 

THEN KEEP LOOPING 
IF MAJOR COUNT NOT 0 

THEN LEAVE WITH STATUS 

ELSE SET TIMEOUT 



OK 



GLOBAL AAfcAS MACRO V0S.03 
GLOBAL SUBROt'TINES SECTION 



2105 
2106 
2107 
2106 
2109 
2110 
2111 
2112 
2113 
2114 
2' 15 
2116 
2117 
21ia 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2a27 
2128 
2129 
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SEQ 62 



<!130 

21* 

2152 

2133 

2134 

2135 

2136 

2137 

2138 

2139 

2140 

2141 



031330 
031330 
031334 
031342 
031346 
031350 
031354 
0S1SS6 
031362 
0313*4 
0313 . 
031372 
31400 



031406 
031410 
03141' 

031420 

031424 



005037 
012774 
012727 
000000 
013727 
000000 
005367 
001375 
005367 
001367 
017464 
022764 



001004 
013774 
000402 

005237 

000207 



STEPl 



THIS SUBROUTINE IS RESPONSIBLE FOR PERFORMING 
STEP 1 OF THE UQ-PORT INIT SEQUENCE. SPECIFI- 
CALLY. IT WILL INITIALIZE THE UUT BY URITING 
TO ITS IP REGISTER. AFTER A BRIEF DELAY. IT 
WILL READ THE SA REGISTER TO INSURE THAT THE 
STEP 1 BIT IS SET AND THE ERROR BIT IS CLEAR. 
IT WILL THEN WRITE THE FIRST LOCATION OF THE 
STEP TABLE (SET UP BY MAINLINE CODE) TO J»E. 
UUT'S SA REG. IF ALL STEPS COfVLETE SUCCESS- 
FULLY THE ROUTINE RETURNS "STEPST" CLEARED; 
OTHERWISE "STEPST" IS RETURNED INDICATING A 
FAILURE OCCURRED. 



002340 
000000 
000001 

002116 

177772 

177756 

000002 
004600 



00227<: 
'V>2S40 



STEPl: 



000000 



000012 
!'00012 



000002 



CLR 

MOV 

MOV 

.WORD 

MOV 

.WORD 

DEC 

BNE 

DEC 

BNE 

MOV 

CMP 



BNE 
MOV 
BR 



STEPST J CLEAR THE STATUS INDICATOR 

«0,STUIP(R4) :INIT THE UUT 

♦i.cpc: 

0 

L»OLY,(PC)* 
0 

6(PC) 
.-4 

-22(PC) 
.-20 

aTUSACR4 3.TUSASV(R4) iGET THE SA REG CONTENTS 
«e.Sl!B.0I!B.00.TUSASV(R4) 

I IF ALL THE RIGHT BITS AREN'T SET 
STPIER : THEN TAKE ERROR EXIT 

STPTBL.aTUSACR4)j ELSE WRITE HOST'S STEP 1 RESPONSE 
STPIEX : AND LEAVE SHOWING SUCCESS 



STPIER: INC 
STPIEX: RTS 



STEPST 
PC 



(SET ERROR INDICATOR 
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SEQ 65 



2146 
2147 
2148 
2149 
2150 
2151 
215' 
^l^i 
2154 
2i.'i'i 
2lb9 
2160 
2161 
2162 
216S 
2164 
2165 
2166 
2167 
2166 
2169 
2170 
2171 



051426 

0S1426 012702 060000 

0S14S2 012703 000024 

031456 006303 

031440 065703 002326 

051444 ni272i 177777 

031450 005505 

051452 C01574 

051454 000207 



8AKPAT 



THIS SUBROUTINE WILL FILL THE COnnUNICATION WITH AN 
ALL I'S DATA PATTERN. THE LENGTH OF THE AREA IN USE 
BY THE CURRENT TEST IS CONTAINEP IH "CHARLG". 



BAKPAT : 



It: 



nov 
nov 

ASL 
ADO 

nov 

DEC 
BNE 

RTS 



•cart«F.R2 

♦20. .R5 
R5 

CHARLG.RS 

•-l.(R2)« 

R3 

It 

PC 



{STARTING ADDRESS OF COrtI AREA 
i-20 yORDS 

(BUFFER LENGTH IN FRONT OF AREA 

I MULTIPLIED BY 2 

I ADD com AREA LENGTH USED 

; WRITE THE DATA 

I IF NOT DONE YET 

I THEN DO IT AGAIN 



GLOeAi. MEAS n«CRO V0S.03 
GLOSAL SUMOt'TXNES SCCTXON 



2176 
2177 
2178 
2179 
2180 
2181 
21S2 
2183 
2184 
2185 
2186 
2187 
2188 
2189 
2193 
2194 
2195 
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SCO 64 



0S1456 
0S1456 

2196 0S1462 

2197 0S1466 
2196 0S1472 

2199 0S1474 

2200 OS 14 76 

2201 031500 
2202 

220S 0S1S02 

2204 0S1504 

2205 031510 

2210 OSl! 
23 It OSl! 
OSll - 
0S1SS2 

o| 

03 




011^ 

051372 
222S 0S1S74 
2224 

2225 0S1576 
CJ1576 
OS 1600 
OS 1602 
OS 1604 



2226 
2227 



012701 
012702 
01270$ 
C20122 
001022 
00S90S 
001374 

005001 
013703 
005722 
001013 

oossos 

001374 

012701 
012705 
020122 
001005 
OOSSOS 
001574 
000425 

j{i;s? 

022757 
001405 

104455 
000001 
024505 
027066 
000404 



104455 

000002 
024532 
027114 



1 1»« 



iCHKCOn 



I 
> 
t 
I 

> 

I i< 
1 1< 



THIS ROUTINE IS CALLED BY TESTS DOING THE f>UROE/f>QLL 
CMECK. IT IS USED TO VCTIFY THAT THE PORT LEFT THE 
COmUNICATIONS AR£A aEARED. AOOITIONALLT. IT CHECKS 
THE 20 UORDS PRECEDING AND SUCCEEDING THE CONN AREA 
TO HAKE SURE THE PORT DIDN'T GO OUTSIDE THE CONH AREA. 



177777 
060000 
000022 



002526 



177777 
000024 



CHKCOH: 



1*: 



51: 



000002 
025652 
000010 



002350 
002114 



101: 



151 i 



051606 



201; 



251: 



MOV 


•-1.R1 


(TEST DATA 


NOV 


•CaNNBF.R2 


; STARTING AOUkCSS 


NOV 


•18. .R3 


J FIRST COUNT 


CnP 


Nl.(R2)* 


ilr NOT ALL IS 


BNE 


IS* 


: THEN bU REPOHT CNRUH 


DEC 


RS 


lIF NOT ALL DONE 


BNE 


11 


1 THEN GO CHECK ANOTHER 


CLR 




;Tc5T UUTA rUR PRINTOUi 


NOV 




CfT 1 IB f^/VMTCB CAB ^AMM ABC A 


TCT 


K R2i* 


. TC klAT A 


BNc 




t 1 ncN uU NcKUn 1 CNNUff 


DEC 


R5 


sIF NOT ALL DONE 


BNE 


SI 


; THEN GO CHECK ANOTHER 


NOV 


♦-1.R1 


sTEST DATA FOR PRINTOUT 


NOV 


•20., R3 


:SET UP COUNTER FOR POST CONN AREA 


CNP 


R1.CR2)* 


J IF NOT ALL I'S 


BNE 


IS* 


THEN GO REPORT ERROR 


DEC 


RS 


>IF NOT ALL DONE 


BNE 


10* 


THEN GO CHECK ANOTHER 


BR 


CKCNEX 


t ELSE RETURN 


SUB 


•2.R2 


{ADJUST ADDRESS FOR PRINTOUT 


NOV 


•LESI.FRUIS 


sLOAO FAILING FRU 


CNP 


♦e.. LITEST 


tIF IN TEST 8 


BEQ 


201 


1 THEN 00 ALTERNATE PRINTOUT 


ERRor 


t.ENSG14.PRIPA0 


! -PURGE/POLL TEST FAILED" 


TRAP 


CtEROF 




.UORO 


1 




.WORD 


ENS614 




.WORD 


PRIPAO 




BR 


251 


sCONNON EXIT 


ERRDT 


2.ENSG15.PRIVAD 


1 -EXTENDED ADDRESS TEST FAILED' 


TRAP 


CIEROF 




.WORD 


2 




.yORO 


ENS61S 




.WORD 


PRIVM) 




OOOU 


LOGUNT 
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C(.OeAL SUtMTOUTXNES SCCTION 

0S1M6 0iS700 002S32 nOV LOGUNT.ftO 

031612 X04451 TRAP C«DOOU 

222B 

2229 031614 000207 CXCHEX: ATS PC 

2230 



GLOBAL AREAS MACRO VOS.03 
GLOBAL SUBROl'TINCS SECTION 



22 SS 
22 S6 
2237 
2238 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 
2250 
2251 
2252 
2253 
2257 
2258 
2259 
2260 
2261 
2262 
226S 
2264 
2265 
2266 
2267 
2268 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
2276 
2277 
2278 
2279 
2280 
2281 
2282 
2283 
2284 
2285 
2286 
2287 
2288 
2289 
2290 
2291 
2292 
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SEQ 66 



031616 
031616 
031622 
031626 

031630 
031632 
031636 
031642 
031646 

031650 
031654 
031662 
031670 
031672 
031700 

031706 
031714 



012703 
012702 
005001 

010122 
012723 
062701 
022701 
001370 

010137 
012737 
032737 
001406 
012737 
012737 

01'>737 
000207 



I' rto 

THIS SUBROUTINE IS CALLED FROM TEST 8 TO INITIALIZE 
nEnORY MANAGEMENT REGISTERS. ALL PAR'S EXCEPT ONE 
ARE SET UP TO MAP VIRTUAL ADDRESSES INTO THE LOWEST 
32K OF PHYSICAL MEMORY. KPAR7 IS SET UP TO MAP TO 
THE I/O PAGE. THE PAR REGISTER THAT CORRESPONDS TO 
THE VIRTUAL ADDRESS OF THE COMMUNICATION AREA IS SET 
UP TO POINT TO THE SECOND S2K OF PHYSICAL MEMORY. 
ALL POR'S ARE INITIALIZED TO THE SAME VALUE; NAMELY. 
UPWARD EXPANDABLE. READ/WRITE ACCESS ENABLED. AND THE 
FULL 8KBYTE PAGE IS ACCESSIBLE. 

»•♦••••••••**••••••••♦•*****•*•*•••***•••****•••**•*•****•*****• 

I ************************************ **************** *********** 



INTMNU: 



172300 






MOV 


«KPDR0.R3 


172340 






MOV 


«KPAR0.R2 








CLR 


Rl 






1«: 


MOV 


R1.(R2)* 


077406 






MOV 


«77406.(R3)* 


000200 






ADD 


*200,R1 


002000 






CMP 


•2000. Rl 








BNE 


11 


172346 






MOV 


R1.KPAR3 


007600 


172356 




MOV 


«7600.KPAR7 


000002 


002314 




BIT 


♦BITl.KTFLAG 








BEQ 


21 


177600 


172356 




MOV 


♦1 77600. KPAR7 


000020 


172516 




MOV 


«MM220N,mUSR3 


000001 


177572 




MOV 


«MM0N.MMUSR0 








RTS 


PC 



031716 








PRTXNT: 




031716 


010174 


000000 






MOV 


031722 


012703 


032140 






MOV 


031726 


012701 


004000 






MOV 


031732 


005037 


002336 






CLR 


031736 


012737 


000030 


002736 


LOOP: 


MOV 


031744 


005002 








CLR 


031746 


005202 






ILOOP: 


INC 


031750 


001016 








BNE 


031752 


005337 


002736 






DEC 


031756 


001013 








BNE 


031760 


017464 


000002 


000012 




MOV 


031766 










ERROF 


031766 


104455 








TRAP 


031770 


000063 








.WORD 



R1,8TUIP(R4) 

♦INTTBL.R3 

«S1.R1 

INISTP 

«24. .CNTHI 

R2 

R2 

2t 

CNTHI 
21 

STUSAC R4 ) . TUSASVC R4 } 

51..WRER1.WRINT0 

CIERDF 



(START OF POR ADDRESS RANGE 
(START OF PAR ADDRESS RANGE 
(STARTING RELOCATION VALUE 

(LOAD RELOCATION VALUE 
-LOAD PDR 

'(ADJUST RELOCATION VALUE 

(IF NOT AT THE END 

I THEN DO ANOTHER ONE 

( ELSE SET THIS REG TO NEXT S2K 

(18 BIT I/O PAGE 

(IF 22 -BIT BUS NOT AVAILABLE 

( THEN GO TURN MMU ON 

( ELSE SET 22 BIT I/O PAGE 

( AND ENABLE 22 BIT MAPPING 

(TURN ON THE WHOLE THING 



(INITIALIZE THE DRIVE 

(PUT THE TABLE ADDRESS INTO R3 

(SET UP TO BEGIN AT STEP 1 

(CI EAR THE STEP TRACKER 

(S f UP THE TIME OUT COUNTER 

■ C wAR R2 

! INCREMENT HI TIME OUT VALUE ? 

(IF NOT. BRANCH 

(ELSE. DECREMENT LO TIMEOUT 

(BRANCH IF NO TIME OUT 

(SAVE THE SA FOR THE ERROR PRINTOUT 

(PRINT PORT INIT FAILURE 
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SEQ 67 



3293 



2294 

2295 
2296 
2297 
2298 
2299 
2300 



2301 



2302 
2303 
2304 
2305 
2306 
2307 
2308 
2309 
2310 
2311 
2312 
2313 
2314 
2315 
2316 
2317 
2318 
2319 
2320 
2321 
2322 
2323 



031772 
031774 
031776 
031776 
032002 
032004 
032006 
032012 
032014 
032022 
032024 
032032 
032032 
032034 
032036 
032040 
032042 
032042 
032046 
032050 
032052 
032056 
032062 
032064 
032066 
032072 
032076 
032100 
032104 
052110 
032114 
0S2116 
032124 
032132 
032136 



032140 
032142 
032144 
032146 



025250 








.WORD 


URERl 




027226 








.WORD 


vmiNTo 










OOOU 


LOGUNT 


;0R0P THE UNIT 


013700 


002332 






nov 


LOGUNT.RO 




104451 








TRAP 


CIDODU 




000454 








8R 


1001 


:EXIT ROUTINE 


037401 


000002 




2*; 


BIT 


UTUSA(R4).R1 


J TEST FOR STEP BIT FROM DRIVE 


001755 




BEQ 


ILOOP 


iLOOP UNTIL SOMETHING SETS 


032774 


100000 


000002 




BIT 


«£RR.aTUSA(R4) 


.•CHECK FOR ERROR 


001413 








BEQ 


3( 


tNO ERROR. KEEP GOING 


017464 


000002 


000012 




nov 

ERROF 


BTUSAC R4 ) . TUSASVC R4 ) 
52..WRER2.URPRTE 


iSAVE THE SA CONTENTS 
(PRINT ERROR 


104455 








TRAP 


CIERDF 




000064 








.WORD 


52 




025302 








.WORD 


URER2 




027252 








.WORD 


URPRTE 










DODU 


LOGUNT 


■DROP THE UNIT 


013700 


002332 






MOV 


LOGUNT.RO 




104451 








TRAP 


CIDODU 




C00432 








BR 


loot 


J EXIT ROUTINE 


005237 


002336 




3*: 


INC 


INISTP 


} INCREMENT THE STEP TRACKER 


012374 


000002 






MOV 


(R3)*.aTUSA(R4} 


:URITE UORD FROM TABLE TO CONTROLLER 


006301 








ASL 


Rl 


J SHIFT TO NEXT STEP 


100324 








8PL 


LOOP 


J IF NOT AT LAST STEP LOOP 


012702 


002716 






MOV 


«RSPRNG,R2 


;PUT THE RESPONSE DESCRIPTOR ADD IN R2 
:PUT THE RESPONSE BUFFER ADDRCSS IN RS 


012703 


002506 






MOV 


«RSPBUF,R3 


010322 




5*: 


MOV 


R3.(R2}* 


J PUT THE BUFF ADD IN THE DESCRIPTOR 


012722 


100000 






MOV 


«0UN.(R2)* 


sSET THE DESCRIPTOR TO THE CONTROLLER 


062703 


000104 






ADO 


•RSPSTP,R3 


jSTEP TO THE NEXT BUFFER SLOT 


022703 


002716 






CMP 


«RSPEND.R3 


;ARE UE AT THE END OF THE BUFFER ? 


001370 








BNE 


5* 


:N0. KEEP GOING 


012737 


002716 


022752 




MOV 


«RSPRNG,RSPSAV 


;SET UP TO USE FIRST RESPONSE BUFFER 


012737 


002726 


02P750 




MOV 


*CMDRNG.CMDSAV 


:SET UP TO USE FIRST COMMAND BUFFER 


005037 


002744 






CLR 


CMOREF 


:SET THE COMMAND REFERENCE « TO 0 


000207 






100$: 


RTS 


PC 


(RETURN 



104400 

002716 
000000 
000001 



ilNIT DATA TABLE 

INTTBL: .WORD 104400 

. UORO RSPRNG 

.WORD 0 

.UORO GO 
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2S25 
2S26 
252? 
2326 
2329 
2330 
2331 
2332 
2333 
2334 
2335 
23^C 
2357 
23S6 
2339 
2340 
2341 
2342 
2343 
2344 
2345 
2346 
2347 
2346 
2349 
2350 
2351 
2S52 
2353 
2354 
2355 
2356 
2357 
2356 
2359 

2360 
2561 
236? 
2563 
2564 
2365 
2566 
2567 
2566 
2369 
2370 
2371 
2372 
2373 
2374 
2575 
2576 
2577 
2376 
2379 
2380 



052150 
032154 
032160 
032164 
032172 
032176 
032204 
032206 
032212 
032216 
032224 
032226 
052232 
032256 
05^240 
032244 
032252 
052254 
052256 
052260 
032262 
032264 
052270 
052274 
052502 
052504 
052512 
052514 
052516 
052522 
052526 
052552 
052554 
052540 
052544 
052544 
052546 



052550 
052550 
052554 
052562 
052564 
052570 
052572 
052576 
052404 
052406 
052412 
052420 
052422 
032426 
032450 
032454 



005064 

005057 
005037 
012737 
004737 
032764 
001060 
012705 
004737 
032764 
001050 
012705 
'5efl737 
005001 
012702 
052757 
001021 
005201 
001572 
COS 502 
001570 
012705 
004757 
052764 
001021 
032764 
OOlOlS 
000750 
013705 
042705 
022705 
001544 
012705 
004757 

104422 

000207 



004757 
052764 
001054 
020527 
001451 
004757 
052764 
001025 
004757 
052764 
001015 
022705 
001012 
004737 
052764 



000014 ORVTST: 

002556 

002360 

025647 002350 
051716 

000001 000014 

002410 
052550 

000001 000014 

002436 
032350 

lul: 

000024 

000200 177560 301: 



002370 
032350 

000001 000014 
000020 000014 



177562 
000200 
000005 

002466 
052350 



50t: 



40* : 



1001; 



CLR 
CLR 
CLR 

nov 
JSR 
BIT 
BNC 
MOV 
JSR 
BIT 
BNE 
nov 
JSR 
CLR 

nov 

BIT 
BNE 
INC 
BNE 
DEC 
BNE 

nov 

JSR 
BIT 
BNE 
BIT 
BNE 
BR 

nov 

BIC 

cnp 

BNE 

nov 

JSR 
BREAK 
TRAP 
RTS 



032456 

000001 000014 

002456 

052556 

000001 000014 
055042 

000001 000014 

002456 

033326 

000001 000014 



CLSORV: : 

It: JSR 
BIT 
BNE 

cnp 

BEQ 
JSR 
BIT 
BNE 
JSR 
BIT 
BNE 

cnp 

BNE 

JSR 
BIT 



LUNFLG(R4) 

PROGRi. 

PROGRH 

♦CTRL.FRUIS 

PC.PRTINT 

•ORPFLG . LUNFLGC R4 ) 

iOOt 

«exELOC.RS 
PC. CLSORV 
«DRPFLG,LUNFLG(R4) 
100* 

•RCVOAT.RS 
PC. CLSORV 
Rl 

420. .R2 
•BIT7.RCSR 

sot 

Rl 
30 1 
R2 
30t 

4G0UST.R5 
PC. CLSORV 
♦ORPFLG. LUNFLGC R4) 

loot 

9D0NEFL. LUNFLGC R4) 

loot 
lot 

R8UF.RS 
•BIT7.R5 
♦CNTRLC.R5 
30 1 

•ABORT. RS 

PC. CLSORV 

CtBRK 
PC 



PC.PRTOHV 
♦ORPFLG. LlJ*'LG(R4) 

icot 

R5.«?CV0AT 

loot 

PC.CDRECV 
•ORPFLG. LUNFLG(R4) 
100* 

PC.CHKRSP 
•ORPFLG. LU»#^LG(R4) 

loot 

•RCVOAT.RS 

loot 

PC.CHKnSG 
•ORPFLG. LUNFLGC R4) 



SEO 60 



J CLEAR ALL FLAGS 

I CLEAR LOW WORD OF PROGRESS INDICATOR 

: CLEAR HIGH WORD OF PROGRESS INDICATOR 

1 DEFAULT FPU IS CONTROLLER 

:G0 00 A PORT INIT 

ilS THE DRIVE AVAILABLE 

{NO. BRANCH TO EXIT 

I SET UP FOR "EXECUTE LOCAL PROGRAH- 

iGQ ISSUE THE COnnANO 

lis THE DRIVE AVAILABLE 

iNO. BRANCH TO EXIT 

jSET UP FOR -RECEIVE DATA- 

iGO ISSUE THE CONHANO 

: CLEAR LOW DELAY COUNTER 

sSET UP HIGH DELAY COUNTER 

J "CONTROL C" INPUT 7 

'YES BRANCH 

lOELAY BETWEEN "GET DUST STATUS" COnnANOS 



SET UP FOR -GET OUST STATUS- 
GO ISSUE THE COnnAND 
IS THE DRIVE AVAILABLE 
NO. BRANCH TO EXIT 

{INTERNAL TEST DONE 7 

J YES. BRANCH TO EXIT 

sLOOP 

GET DATA INPUT FROM KEYBOARD 

STRIP PARITY 

"CONTROL C" INPUT 7 
sNO. BRANCH 
;SET UP FOR "ABORT" 
iGO ISSUE THE COnnANO 



{RETURN 



)G0 SEND THE CONNANO 
sIS THE DRIVE AVAILABLE 
sGET OUT IF NOT AVAILABLE 

•RECEIVE DATA" CONHAND JUST ISSUED \ 

YES. BRANCH TO EXIT 

GO CHECK FOR ANY NEW RESPONSES 

IS THE DRIVE AVAILABLE 

GET OUT IF NOT AVAILABLE 

GO C^CCK CONTENTS OF RESPONSE 

IS THE DRIVE AVAILABLE 

GET OUT IF NOT AVAILABLE 

WAS IT A -RECEIVE DATA- COnnANO ? 

NO. BRANCH TO EXIT 

GO CHECK MESSAGE FROM INTERNAL TEST 
IS THE DRIVE AVAILABLE 
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2S81 


032442 


001004 








BNE 


2SS2 


032444 


012705 


002370 






fibv 


236S 


032450 


004737 


032556 






JSR 


2394 


032454 


000207 






loot; 


RTS 


2S6S 














2SM 














2307 














2368 














2369 


^2456 








PRTORV : 




2390 


,32456 


013701 


022750 






MOV 


2391 


032462 


010511 








MOV 


2392 


032464 


012761 


100000 


000002 




MOV 


2393 


032472 


005774 


000000 






TST 


2394 


032476 


005774 


000002 






TST 


2395 


032502 


001413 








BEQ 


2S96 


032504 


017464 


000032 


000012 




MOV 


2397 


052512 










ERROF 




032512 


104455 








TRAP 




032514 


000065 








.WORD 




032516 


C25351 








.WORD 




032520 


027252 








.WORD 


2396 


032522 










DOOU 




032522 


013700 


002332 






MOV 




032526 


104451 








TRAP 


2399 


032530 


000411 








BR 


2400 


032532 


062701 


000004 




101: 


ADO 


2401 


032536 


022701 


002736 






CMP 


2402 


032542 


001002 








BNE 


2403 


032544 


012701 


002726 






MOV 


2404 


032550 


010137 


022750 




15* : 


MOV 


2405 


032554 


000207 






1001: 


RTS 


2406 














2407 














2406 














2409 














2410 


032556 








CORECV: 




2411 


032556 


004737 


032670 




1»: 


JSR 


2412 


032562 


032764 


000001 


000014 




BIT 


2413 


032570 


001036 








BNE 


2414 


03257? 


032764 


000020 


000014 




BIT 


2415 


032600 


001016 








BNE 


2416 


032602 


011103 








nov 


2417 


032604 


026365 


000000 


000000 




CMP 


2418 


032612 


001411 








BEQ 


2419 


032614 


022705 


002370 






CMP 


2420 


032620 


001022 








BNE 


2421 


032622 


012705 


002436 






MOV 


2422 


032626 


026365 


000000 


000000 




CMP 


2423 


032634 


001014 








BNE 


2424 


032636 


012761 


100000 


000002 


lots 


MOV 


2425 


032644 


062701 


000004 






AOO 


2426 


032650 


022701 


002726 






CMP 


2427 


032654 


001002 








BNE 


2426 


032656 


012701 


002716 






MOV 


2429 


032662 


010137 


022752 




151: 


MOV 


2430 


032666 


000207 






100): 


RTS 


2431 
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SEQ 69 



100* iGET OUT IF NOT AVAILABLE 

#G0UST.R5 s-GET OUST STAUS" PACKET ADDRESS 

PC. CORECV iGO GET LAST RESPONSE 

PC .RETURN 



CMOSAV.Rl 
R5.(R1) 

«0UN.HIA00R(R1) 

8TUIP(R4) 

aTUSACR4) 

101 

STUSAC R4 ) . TUSASVC R4 ) 
S3. .URER4.URPRTE 

C»ER0F 
53 

URER4 

URPRTE 

LOGUNT 

LOGUNT.RO 

ODOOU 

loot 

♦RNGSTP.Rl 
*DSCEN0.R1 
15* 

»CM0RNG.R1 

Rl.CMOSAV 

PC 



,SET UP COMMAND RING POINTER 

:PUT THE PACKET ADDRESS INTO THE DESCRIPTOR 

:SET THE OWNERSHIP BIT Of THE DESCRIPTOR 

J READ THE IP REGISTER 

:READ THE SA REGISTER 

(BRANCH IF NO ERRORS 

:SAVE THE SA FOR THE ERROR PRINTOUT 

: PRINT PORT DETECTED ERROR 



:DROP THE UNIT 



:GET OUT 

(ADJUST RESPONCE POINTER FOR NEXT TIME 

:ARE WE AT THE END 7 

:N0. GET OUT 

;SET Rl TO TOP BUFFER 

:SAVE THE COMMAND RING LOCATION 

{RETURN 



PC.PDRECV 

«0RPFLG.LUNFLG(R4) 

100* 

«00NEFL .LUNFLG(R4 ) 
10* 

(RD.RS 

P.CRF(R3),P.CRF(R5) 
10* 

«GDUST.RS 
100* 

«RCV0AT.R5 

P.CRF(R3).P.CRF(R5) 

100* 

«0UN.HIADDR(R1) 
•RNGSTP.Rl 
«CM0RNG,R1 
15* 

«RSPRNG.R1 

Rl.RSPSAV 

PC 



CALL PORT DRIVER RECEIVE 
IS THE DRIVE AVAILABLE 
GET OUT IF NOT AVAILABLE 
INTERNAL TEST DONE ? 
YES. BRANCH 

SET UP RESPONCE BUFFER POINTER 

IS THIS THE RESPONSE THAT IS EXPECTED 

YES BRANCH 

WAS 'it a -GET DUST STATUS" COMMAND 7 

NO. BRANCH TO EXIT 

GET START OF "RECEIVE DATA" PACKET 

IS IT A "RECEIVE DATA" RESPONSE ? 

NO. BRANCH TO EXIT 

GIVE THE CONTROLLER THE RING BACK 

ADJUST RESPONCE POINTER FOR NEXT TIME 

ARE WE AT THE END 7 

NO. GET OUT 

SET Rl TO TOP BUFFER 

SAVE THE POINTER FOR NEXT TIME 

RETURN 
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SEQ 70 



2432 
2433 
2434 
2435 
2436 
2437 
24 3Q 
2439 
2440 
2441 
2442 
2443 
2444 



2445 



2446 
2447 



2446 



2449 

2450 
2451 
2452 
2453 
2454 



245S 



2456 
2457 
2456 
2459 
2460 
2461 
2462 
2463 
2464 
2465 
2466 
£467 
2466 
2469 
2470 



032670 
032670 
032674 
032702 
032704 
032706 
032710 
032714 
032716 
032722 
032724 
0S2724 
032726 
032730 
032752 
032734 
032734 
032740 
032742 
012"»44 
032744 
032746 
032750 
032752 
032754 
032754 
032760 
032762 
032764 
052772 
033000 
033002 
033010 
011010 
033012 
033014 
033016 
033020 
033020 
033024 
C33026 
033030 
033036 
033040 



033042 
033050 
033052 
0SS056 
033060 
0SS064 
0S3066 



013701 
012737 
005002 
005202 
001026 
005337 
001023 
022705 
001410 

104455 

000066 
024567 
030624 

013700 
104451 
000436 

104455 
000067 
024637 
030624 

013700 
104451 
000426 
017464 
032764 
001413 
012737 

104455 

000070 
024271 
027252 

013700 
104451 
000404 
032761 
001322 
000207 



PORECV: 

022752 

000005 002736 It: 



5*1 



002736 
002370 



002332 



6t. 



002332 



000002 000012 10 >j 
100000 000012 

025670 002330 



002332 

100000 000002 20 t: 
100*: 



026365 000000 000000 CHKRSP: CMP 
001003 BNE 
005763 000012 TST 
001451 6EQ 
022705 002410 5»- CMP 

BEQ 



nov 


RSPSAV.Rl 


PUT THE RESPONSE RING SAVE IN Rl 


MOV 


•5.CNTHI 


SET UP THE TIME OUT COUNTER 


CLR 


R2 


CLEAR R2 


INC 


R2 


INCREMENT HI TIME OUT VALUE ? 


BNE 


lot 


NO OVERFLOU YET. BRANCH 


DEC 


CNTHI 


ELSE. INCREMENT HI TIMEOUT 
KEEP GOING .NO TIME OUT YET 


BNb 


lot 


CMP 


•G0UST.R5 


WAS IT A "GET OUST STATUS" COMMAND ? 


BEQ 


6t 


YES PRINT ERROR 


ERRDF 


54. .EMSG16.rRUERR 


"EXECUTE LOCAL PROGRAM' COMMAND TIMEOUT 


TRAP 


CtERDF 




.WORD 


54 




.WORD 


EMS616 




.UORO 


FRUERR 




DODU 


LOGUNT ;G0 DROP THE UNIT 


MCV 


LOGUNT.RO 




TRAP 


CtDODU 




BR 


loot sGET OUT ON ERROR 


ERROF 


55. .bMSG 17. FRUERR 


"GET OUST STATUS" COMMAND TIMEOUT 


TRAP 


CtERDF 




.UORD 


55 




.WORD 


EMSG17 




.UORD 


FRUERR 




DOOU 


LOGUNT 


;G0 DROP THE UNIT 


MOV 


LOGUNT.RO 




TRAP 


CtDODU 




BR 


loot 


sGET OUT ON ERROR 


MOV 


8TUSA( R4 ) , TUSASVC R4 ) 


J GET SA CONTENTS 


BIT 


«6IT1S.TUSASV(R4) 


I CHECK FOR SA ERROR 


BEQ 


20 1 


iNO ERROR. BRANCH 


flOV 


♦LSCT.FRUIS 


iLOAO FAILING FRU 


ERROF 


56. ,EMSG9.URPRTE 


i PRINT "SA CONTENTS IN ERROR" MESSAGE 


TRAP 


CtERDF 




.WORD 


56 




.UORD 


EMSG9 




.WORD 


URPRTE 




DOOU 


LOGJNT 


sDROP THE UNIT 


MOV 


LOGUNT.RO 




TRAP 


CtDODU 




BR 


100$ 


tGET OUT ON ERPOR 


BIT 


«0UN.HIADDR(R1) 


:IS THE SLOT SET "0 US ? 


BNE 


5> 


sKEEP GOING TILL "IMEOUT OR SUCCESS 


RTS 


PC 


{RETURN 



001416 
022705 002436 



CMP 



?.CRF(R3).P.CRFCR5) 
5t 

P.STS(R3) 
151 

•EXEL0C.R5 
7t 

•RCVOAT.RS 



:DID COMMAND RF/ERENCE NUMBERS MATCH ? 
iNO. BRANCH 
lUAS STATUS "NORMAL"? 
YES. BRANCH 

UA*- IT AN "EXEC LOC PROG" COMMAND ? 
YES. BRANCH 

UAS IT A "RECEIVE DATA" COMMAND ? 
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SEQ 71 



2471 
2472 
2473 
2474 



2475 



2476 
2477 



2478 



2479 
2460 



2481 



2482 
248S 



2484 



2485 
2486 
2487 
2488 
2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2498 
2499 
2500 



03»,072 
033074 
033100 
033102 
033102 
035104 
033106 
031110 
033112 
033112 
033116 
033120 
033122 
033122 
033124 
033126 
033130 
033132 
033132 
033136 
033140 
033142 
033142 
033144 
033146 
033150 
033152 
033152 
033156 
033160 
033162 
033162 
033164 
033166 
033170 
033172 
033172 
033176 
033200 
033202 
033206 
033210 
033216 
033220 
033226 
033230 
033236 
033240 
033242 
033250 
033252 
033260 
033262 
033270 
033270 
033272 
C 53274 



001423 
022705 
001430 

104455 

000071 
024701 
030256 

013700 
104451 
000501 

104455 

000072 
024743 

027306 

013700 
104451 
000471 

104455 

000073 
025013 
027726 

013700 
104451 
000461 

104455 
000074 
025052 
030624 

013700 
104451 
000451 
022705 
001046 
032764 
001411 
126327 
001325 
126327 
001321 
000431 
026337 
003017 
026337 
003013 
012757 

104455 

000075 
025104 



002466 



61: 



002332 



7»: 



002332 



81: 



002332 



9$; 



002332 

002370 151: 

000010 000014 

000010 000201 

000017 000007 

000020 002356 201: 

000022 002360 

025716 002330 301 : 



BEQ 


8* 


DIP 


#A80RT.RS 


BEQ 


91 


ERROF 


57 .EMSG18.C0SERR 


TRM> 


CIEROF 


.WORD 


57 


.UORD 


EMSG18 


.WORD 


GOSERR 


OODU 


LOGUNT 


nov 


LOGUNT.RO 


TRAP 


CtOOOU 


BR 


100* 


ERROF 


58. .EMSG19.ELPERR 


TRAP 


CIEROF 


.WORD 


58 


.WORD 


EMSG19 


.WORD 


ELPERR 


DODU 


LOGUNT 


MOV 


LOGUNT.RO 


TRAP 


ClOOOU 


BR 


1001 


ERROF 


59. .EMSG20.RCVERR 


TRAP 


CIEROF 


.UORD 


59 


.UORO 


EMSG20 


.WORD 


RCVERR 


OODU 


LOGUNT 


HOV 


LOGUNT.RO 


TRAP 


ClOOOU 


BR 


100* 


ERROF 


60. .EMSG21,FRUERR 


TRAP 


CIEROF 


.UORO 


60 


.UORO 


EMSG21 


.UORO 


FRUCRR 


OODU 


LOGUNT 


MOV 


LOGUNT.RO 


TRAP 


ClOOOU 


BR 


1001 


CMP 


«G0UST.R5 


BNE 


1001 


BIT 


«TEST.9,LUNFLG(R4) 


BEQ 


20t 




P.F<lOC(R3).#201 


SHE 


61 


ChPB 


P.FLGS(R3),#7 


BNE 


61 


BR 


1001 


CW 


P.IND1(R3).PR0GRL 


BGT 


501 


CMP 


P.IN02(R3).PR0GRH 


BGT 


501 


MOV 


«0RVE.FRU1S 


ERROF 


61..EMSG22.FRUERR 


TRAP 


CIEROF 


.UORO 


61 


.UORO 


EMSG22 



I YES. BRANCH 

:UAS IT AN -ABORT" COMMAND 7 
iTES. BRANCH 

jPRINT -GET DUST STATUS" COMMAND FAILURE 



:DROP THE UNIT 



:GET OUT ON ERROR 

jPRINT -EXECUTE LOCAL PROGRAM" COMMAND FAILURt 



J DROP THE UNIT 



:GET OUT ON ERROR 

J PRINT "RECEIVE DATA" COMMAND FAILURE 



iOROP THE UNIT 



:GET OUT ON ERROR 

{PRINT "ABORT" COMMAND FAILURE 



lOROP THE UNIT 



GET OUT ON ERROR 

UAS IT A GET OUST STATUS COMMAND 7 

NO. BRANCH TO EXIT 

ARE UE IN TEST 9 ? 

NO. 60 CHECK PROGRESS INDICATOR 

CORRECT ENOCOOE ? 

NO. ERROR 

CORRECT FLAGS ? 

NO. ERROR 

SUCCESS RETURN 

CHECK LOU UORO OF PROGRESS INDICATOR 

PROGRESS BEING MADE. BRANCH 

CHECK HIGH UORO OF PROGRESS INDICATOR 

PROGRESS BEING MADE. BRANCH 

LOAD FAILING FRU 

PRINT "INTERNAL TEST HUNG" ERROR 
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56-4 



2501 



2502 
2505 
2504 
2505 
2^06 
2507 
2300 
2509 
2510 
2511 
2512 
2S1S 
2514 
2515 
2516 
2517 



2516 



2519 
2520 
2521 
2522 
2523 
2524 
2525 
2526 



2527 



252a 
2529 
2530 
2531 
2532 
2543 
2544 
2572 
2573 
2574 
2575 
2576 
2577 
2578 
2579 



033276 
033300 
033300 
033304 
033306 
033310 
033316 
033324 



033326 
033332 
033336 
033340 
033344 
033346 
0SSSS2 
033354 
033354 
033356 
033360 
033362 
0SSS64 
0SSS64 
033370 
033372 
033374 
033402 
033406 
033414 
033422 
033430 
033436 
033436 
033440 
033442 
033444 
033446 
033446 
033452 
033454 
033462 

033464 



0SS464 



030624 

013700 
104451 
000406 
016357 
016337 
000207 



012701 
121127 
001446 
121127 
001413 
121127 
001440 

104455 

000076 
025135 
030604 

013700 
104451 
000430 
012737 
012702 
116162 
116162 
116162 
116162 

104455 

000077 
025215 
030540 

013700 
104451 
052764 
000207 



002332 



000020 
000022 



060000 
000001 

000002 

000003 



002356 50»: 
002360 

1001: 



CHKflSG: 



.WORD FRUERR 

OOOU LOGUNT 

NOV LOGUNT. RO 

TRAP OOOOU 

BR 100« 

NOV P.IN01(R3).PR0GRL 

NOV P.IN02CR3).PR0GRH 

RTS PC 



002332 



025716 
024066 
000002 
000003 
000004 
000005 



002330 1«: 

000020 
000021 
000046 
000047 



002332 
000020 



000014 100* : 



MOV 


•ROBUF ,R1 


CMPB 


CR1).#1 


BEQ 


1001 


CMPB 


CR1).*2 


BEQ 


If 


CMPB 


IKI J ,#3 


n 

BcO 


loot 


cRHur 






U9cKUr 


.WORD 


62 


.UORO 


EMSG2S 






OOOU 


LOGUNT 


MOV 


LOGUNT. RO 


TRAP 


ClOODU 


BR 


100 « 


MOV 


«0RVE.rRUIS 


MOV 


♦FAULTC.R2 


M0V8 


2CR1).20(R2) 


MOVB 


3(R1).21(R2) 


MOVB 


4(R1).46CR2) 


MOVB 


5(R1).47(R2) 


ERROF 


63..EMSG24.INTMSG 


TRAP 


C«EROF 


.WORD 


63 


.WORD 


EnSG24 


.WORD 


INTMSG 


DODU 


LOGUNT 


MOV 


LOGUNT. RO 


TRAP 


ClOODU 


BIS 


•00NEFL.LUW^LG(R4) 


RTS 


PC 


ENOMOO 





.TITLE MISCELLAfCOUS SECTIONS 
.SBTTL REPORT COOING SECTION 

BGNMOD 

.SBTTL INITIALIZE SECTION 



:DROP THE UNIT 



sGET OUT ON ERROR 

(UPDATE LOU WORD Of PROGRtSS INDICATOR 
(UPDATE HIGH WORD OF PROGRESS INDICATOR 



:GET START ADDRESS OF MESSAGE BUFFER 
(NORMAL COMPLETION MESSAGE 7 
(YES. BRANCH TO EXIT 
(ERROR COMPLETION MESSAGE ? 
{YES BRANCH 

(NORMAL COMPLETION WITH INFO. MESSAGE ? 

(YES. BRANCH TO EXIT 

(INVALID MESSAGE FROM INTERNAL TEST 



(DROP THE UNIT 



(GET OUT ON ERROR 

(GET FAILING FRU 

(GET ADDRESS OF ERROR MESSAGE 

;1ST ASCII BYTE OF FAULT CODE INTO MESSAGE 

(2N0 ASCII BYTE OF FAULT CODE INTO MESSAGE 

(1ST ASCII BYTE OF SUB -FAULT CODE INTO MESSAGE 

{2N0 ASCII BYTE OF SUB-FAULT CODE INTO MESSAGE 

(PRINT ERROR MESSAGE 



(DROP THE UNIT 



(SET DONE FLAG 
(RETURN 



»♦♦ 
t 
t 
( - 



THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 
AT THE BEGINNING OF EACH PASS. 



MISCELLANEOUS SECTIONS 
INITIALIZE SECTION 
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2562 
















2504 


053464 








0SS464 


012700 


000040 




053470 


104447 




2565 


033472 
033472 


103421 




2586 








2507 


033474 








0334 74 


012700 


C0C0S7 




033500 


104447 




2506 


0SSS02 
033502 


103415 




2569 








2590 


033504 








033504 


012700 


000034 




033510 


104447 




2591 


033512 
033512 


103411 




2592 








2593 


033514 








033514 


012700 


000035 




033520 


104447 




2594 


033522 
033522 


103422 




2595 








2596 


033524 








033524 


012700 


000036 




033530 


104447 




2597 


033532 
033532 


103465 




2596 








2599 


033534 


000423 




2600 








2601 


033536 






2602 


033536 


012737 


000000 


2603 


033544 


005037 


002314 


2604 


033550 


012704 


002234 


2605 


033554 


022737 


001400 


2606 


033562 


103002 




2607 


033564 


004737 


030776 


2606 








2609 


033570 
033570 


104433 




2610 


033572 


005237 


002312 


2611 


033576 


012737 


1/7777 


2612 








2613 


033604 


005237 


002332 


2614 


033610 


023737 


002332 


2615 


035616 


001433 




2616 








2617 


033620 








033620 


013700 


002332 




033624 


104442 





LtlNIT: 



BGNINIT 



REAOEF ♦EF.START 
MOV ♦EF.START.RO 
TRAP CIREFG 
BCOMPLETE START 
BCS START 

REAOEF ♦EF.RFSTART 
MOV •EF.fffcSTART.RO 
TRAP CIREFG 
BCOMPLETE START 
BCS START 

REAOEF «EF.PUR 
MOV ♦EF.PMR.RO 
TRAP C»REFG 
BCOMPLETE START 
BCS START 

REAOEF «EF.NEU 
MOV «EF.NEW,RO 
TRAP CIREFG 
BCOMPLETE NUPASS 
BCS NUPASS 

REAOEF «EF. CONTINUE 
MOV ♦EF. CONTINUE, RO 
TRAP CIREFG 
BCOMPLETE END 



BCS 
BR 



START: 



MOV 
CLR 
MOV 
CMP 
BHIS 
JSR 

NUPASS: BRESET 
TRAP 
INC 
MOV 



NEXT: 



INC 
CMP 
BEQ 

GPHARD 

MOV 

TRAP 



END 
NEXT 



♦O.PASCNT 

KTFLAG 

•LUN8LK.R4 

♦1400.LIHIME 

NUPASS 

PC.KTTEST 



CIRESET 

PASCNT 

«-l,LOGUNT 

LOGUNT 

LOGUNT.LIUNIT 
END 

LOGUNT. RO 
LOGUNT. RO 
CIGPHRD 



SEQ 73 



I IF THIS IS A FRESH START 
1 THEN GO TO START 
:IF THIS IS A RESTART 
! THEN 60 TO START 
ilF POUER-FAIL OCCURRED 

THEN START FROM THE BEGINNING 
:IF THIS IS A NEW PASS 
i THEN SKIP START UP CODE 
;IF THIS IS A CONTINUE 
: THEN SKIP ALL INIT CODE 
I JUST HERE FOR NEXT UUT 



{INITIALIZE PASS COUNT 

J IN CASE WE'RE STARTED > THAN ONCE 

;R4 WILL ALWAYS POINT TO LUNBLK 

:IF <- 26KU0R0S OF MEMORY PRESENT 

I THEN SKIP NEXT 

: ELSE SEE IF MMU IS PRFSCNT 

t CLEAR THE WORLD 

{UPDATE THE PASS COUNT 
{INITIALIZE LOGICAL UNIT COUNT 

{POINT TO NEXT UUT 

(IF WE'VE PASSED MAXIMUM UUT'S 

{ THEN LEAVE INIT 

{GET P- TABLE FOR THIS UNIT 
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INITIALIZE SECTION 





033626 










BNCOMPLETE NEXT 


033626 


103366 








acc 


NEXT 


2619 
















2620 


033630 


011064 


000000 






nov 


(R0).TUIP(R4) 


2621 


033634 


012064 


000002 






flOV 


CRO)* TUSA(R4) 


2622 


033640 


062764 


000002 


000002 




AOO 


92 TUSA(R4) 


2623 


033646 


012064 


000004 






MOV 


«.R0)».TUVEC(R4) 


2624 


033652 


011064 


000006 






riov 


(R0).MSCPUN(R4) 


2625 


033656 


004737 


031162 






JSR 


PC.RSTVEC 


2626 


033662 










PRINTF 


tflMSG.LOGUNT 




033662 


013746 


002332 






MOV 


LOGUNT . -f SP) 




033666 


012746 


033712 






flOV 


tfinsG . - f sp 1 




033672 


012746 


000002 






HOV 


«2, -CSP) 




033676 


010600 








MOV 


SP.RO 




033700 


104417 








TRAP 


OPNTF 




033702 


062706 


000006 






AOO 


«6,SP 


2627 














^628 


033706 








END: 






2629 


033706 
033706 
033710 


104432 
000032 








EXIT 
TRAP 
.WORD 


INI1 
CIEXIT 
L10007- . 


2630 
















2642 


033712 


045 


116 


045 


iriS3: 


.ASCIZ 


7i(NllATESTING UNIT 


2643 












.EVEN 




2644 
















2645 


033742 
033742 
033742 


104411 






L10007: 


E^«)INIT 
TRAP 


OINIT 



:TRY AGAIN 



:PUT IP REG ADDRESS IN LUNBLK 

: ANO ANOTHER COPY IN LUNBLK 

tMAKk IT THE SA REG ADDRESS 

J GET THE VECTOR INTO THE LUNBLK 

J PUT THE T/MSCP UNIT * IN LUNBLK 

iSET UUT VECTOR FOR ILLEGAL INTRPTS. 

J "TESTING UNIT N" 



niSCELLANEOUS SECTIONS 
CLEANUP COOING SECTION 



2647 
2648 
2649 
2650 
265 1 
2652 
2653 
2654 



2655 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 



2673 
2674 



2675 
2687 
2688 
2689 
2690 



033744 
033744 

033744 
033752 



033760 
033760 
033764 

033766 
033766 
033770 



033772 
033772 
033772 



032764 
001400 



016400 
104436 



104432 
000002 
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.SBTTL CLEANUP COOING SECTION 

!*THE CLEANUP COOING SECTION CONTAINS THE CODING THAT IS PkPrORnED 
: AFTER THE HARDUARE TESTS HAVE BEEN PERFORMED. 

BGNCLN 
L< CLEAN: : 



SEQ 75 



OOOOOOG 002234 



033754 005064 000014 



000004 



BIT 
BEQ 



•T9FLAG.LUNBLK(R4) 
ENOCLE 



J IF NOT MERE FROM TEST 9 
I THEN SKIP THE REST 



{EVENTUALLY MORE CODE UILL BE PLACED HERE TO GUARANTEE THAT AN ABORT 
sCOtlNANO IS ISSUED TO THE UUT T<. STOP EXECUTION OF THE LOCAL PROGRAM . 



ENOCLE: CLR 



LUNFLG(R4) 



t CLEAR OUT THE LUN FLAGS 



jNOTE: THIS LINE OF CODE MAY HAVE TO BE REMOVED TO HANDLE tC FOLLOUED 
iBY A PROCEED COMMAND CORRECTLY. 

CLRVEC TUVEC(R4) sPUT TRAP CATCHER" INTO VECTOR 

MOV TUVEC(R4).R0 

TRAP CICVEC 



104412 



LlOOlO: 



EXIT 
TRAP 
.UORO 



.EVEN 

ENDCLN 

TRAP 



CLN 
CIEXIT 
L 10010 - 



CI CLEAN 
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DROP UNIT SFCTION 



SEQ 76 



2692 
2693 
2694 
2695 
2696 
2697 
2690 

2699 033774 
033774 

2700 
2706 

2707 033774 012764 000001 000014 
2706 

2709 034002 

034002 000167 
034004 000000 

2710 
2722 
2723 
2724 

2725 034006 
034006 

0S4006 104453 



.SBTTL DROP UNIT SECTION 

TthE drop-unit SECTION CONTAINS THE COOING THAT CAUSES A DEVICE 
: TO NO LONGER BE TESTED. 

I -- 



LlOU: : 



LlOOll: 



BGNDU 



nov 

EXIT 

.WORD 

.WORD 



.EVEN 
ENDOU 
TRAP 



«DRPFLG.LUNFLGCR4) 

DU 

JUMP 
L10011-2-. 



CIDU 



(LETS PROGRAN KNOH IT'S DEAD 



nZSCELLANEOUS SECTIONS 
AOO UNIT SECTION 



2727 
2726 
2729 
2750 
2731 
2732 
2733 
2734 
2735 
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.SeTTL AOO UNIT SECTION 

TthE ADO-UNIT SECTION CONTAINS ANY CODE THE PROGRAHMER WISHES 
( TO BE EXECUTED IN CONJUNCTION UITH THE ADDING OF A UNIT BACK 
5 TO THE TEST CYCLE. 



SEQ 77 



27 SB 
2742 
2743 



2744 
275B 
2757 
275A 

275"* 



2760 
2761 
2762 
2764 
2766 
2769 
2770 
2771 
2772 
2773 
2774 
277B 
2779 
2792 
2794 
2795 
2796 
2797 
2796 
2799 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2B07 
2611 

2612 
2613 
2614 
2615 
2816 



034010 
034010 



034010 
034Ci0 
034012 



034014 
034014 
034014 

034016 



t ■ 



LIAU: 



000167 
000000 



BGNAU 



EXIT AU 
.WORD JtJNP 
.WORD L10012-2-. 



.EVEN 



104452 



000000 



L 10012: 



ENOAU 

TRAP 

ENONOO 



C«AU 



.TITLE HARDWARE TEST 

HELP-0 J CONTROL LISTING OF HELP INFORMATION 

s HELP-0 NO LIST 
! HELP-1 LIST 



jONEFILE- 



CONTROL USE OF SOURCE FILES 

ONEFILE IS NOT DEFINED ASSEHBLE EACH SOURCE FILE SEPARATELY 
ONEFILE-ANYTHING ASSEMBLE ALL SOURCE FILES TOGETHER 



.SBTTL TEST 1: EXISTENCE VERIFICATION TEST 



TEST 1 - EXISTENCE VERIFICATION TEST 

THIS TEST VERIFIES THE EXISTENCE OF THE UUT BY 
ATTEMPTING TO READ FIRST THE IP AND THEN THE SA 
REGISTERS OF THE TU61. VECTOR 4 IS SET UP UITH 
A TRAP HANDLING ROUTINE IN CASE OF A NON-EXISTENT 
MEMORY TIMEOUT. 



I" 



034016 
034016 
0S4016 
034020 
054026 
034032 
034034 



000240 
012737 
005737 
001404 
012737 



Tl! 



000001 OOOOOOG 
002312 

000010 OOOOOOG 



BGNTST 

NOP 
MOV 
TST 
BEQ 
MOV 



•l.ITRCNT 

PASCNT 

Tl.l 

♦IC.ITRCNT 



iSET UP FOR ONE TEST ITERATION 

ilF PASS 0 

; THEN START TEST 

: ELSE 00 MULTIPLE ITERATIONS 



HAAOWAAE TEST ftACRO V05.0S m^n—Omy 09-0ct-65 10:06 P*o« 59-1 
TEST I: EXISTENCE VERIFICATION TEST 



SEC -*8 



2«i7 
2818 



2819 
2820 
2821 



2822 
2t2S 
2824 

2823 



282« 
2827 
2828 
2829 
2830 
28S1 



2832 
2853 

2854 



^835 
.^83« 



2857 
i?838 



2839 
2840 
2841 



2842 



0S4042 
034044 
034044 
034044 
034O4« 

034092 
0340^ 
034OM 
0340*2 
0340M 
054072 
OS4074 
034100 
034 102 
03410* 
034110 
034110 
034114 
034116 
034122 
034124 
034130 
034152 
034136 

034140 
034144 
034146 
034150 
034156 
034 156 
034160 
034162 
034164 
034166 
034166 
054170 
054170 
054174 
034176 
034176 
0»Ji200 

03^202 
034202 
034202 
034204 
054206 
034206 
054312 
054214 
054222 
054224 
034224 
0542M 



000240 



104402 

005057 



012746 
012746 
012746 
012746 
1044S7 
062706 
000240 
005074 
000240 

012727 
000000 
C13727 
000000 
005367 
001375 
005367 
001367 

003737 
001416 
000240 
012737 

104455 

000005 
024140 
027222 

104406 

013700 
104451 

104410 

000002 



104403 
000240 

012700 
1044S6 
032764 
001402 

104410 
000264 



002316 



000340 
030656 
000004 
000003 

000010 

000000 



000001 
002116 
177772 
177756 

002316 

025647 002330 



Tl.l: 
1»: 



002332 



SI: 

L10014: 



000004 

000001 000014 



NOP 

e'KsuB 

TRAP 

CLR 

SETVEC 
MOV 

nov 
nov 
nov 

TRAP 

ADO 

NOP 

CLR 
NOP 
DELAY 

nov 

.UORO 

nov 

.WORD 

DEC 

BNE 

DEC 

BNE 

TST 
BEQ 
NOP 

nov 

ERROF 

TRAP 

.UORO 

.WORD 

.WORD 

CKLOOP 

TRAP 

DODO 

nov 

TRAP 
ESCAPE 
TRAP 
.UORO 

ENOSUB 

TRAP 

NOP 

CLRVEC 

nov 

TRAP 

BIT 

BCQ 

ESCAPE 

TRAP 

.UORO 



CI8SUB 
TRP4FG 

♦VEC4 *TRAP4.«PRI07 

#PR10"> (SP) 

♦TRAP .-(SP) 

•VEC'k.-CSP) 

♦3.-(SP) 

CISVEC 

#10. SP 

8TUIP(R4) 



♦l.CPO* 
0 

L«OLY.(PC)» 
0 

-6(PC) 
.-4 

-22(PC) 
.-20 

TRP4FG 
5> 

♦CTRL.FRUIS 

S.EnSGS.PRIERR 

OERDF 

5 

EnSGS 
PRIERR 

CICLPl 

LOGUNT 
LOGUNT.RO 
C 10001; 
SUB 

CIESCAPE 
U0014-. 



CIESUB 

•VEC4 

#VEC4.R0 

CICVEC 

«0RPn.6.tiMFLGCR4) 

T1.2 
TST 

CIESCAPE 
L1001S-. 



: CLEAR MXW TRAP FLAG 

sSET UP VECTOR 4 FOR NXn 1RAP 



tURITE THE IP REGISTER 
inAKE SURE TinEOUT CAN OCCUR 



iIF NO TRAP OCCURRED 
: THEN CONTINUE TEST 

J IDENTIFY FAILING FRU FOR PRINTOUT 
j"NXn ON READ TUIP* 



(LOOP ON ERROR? 
;OROP UNIT 

iCAN'T CONTINUE 



(RESTORE VECTOR 4 

(IF UNIT UAS NOT DROPPED 
I THEN CONTINUE TESTING 
J ELSE LEAVE TEST 



HARDWARE TEST MACRO V0S.03 U*dn«*day 09- 
TEST 1: EXISTENCE I^ERIflCATXON TEST 



2643 



2844 
2645 
2046 



2847 
2846 
2849 

2650 



285'. 
2652 
2853 
2654 
2655 
2656 



2657 
2658 

2659 



2660 
2661 
2862 
2663 
2664 
2665 
2666 
2867 



2666 
2869 



034230 
034250 
034230 
034232 

034236 
034236 
034242 
034246 
034252 
034256 
034260 
034264 
034266 
034272 
034274 
034274 
034300 
034302 
034306 
034310 
034314 
034316 
034322 

034324 
034330 
034332 
034334 
034342 
034342 
034S44 
034346 
034350 
034352 
034352 
034354 
034354 
034360 
034362 
034362 
034364 

034366 
034374 
034402 
034404 
034406 
034414 
034422 
034422 
034424 
034426 
034430 
034432 
034432 
034434 



104402 

005037 



012746 
012746 
012746 
012746 
104437 
062706 
000240 
005774 
000240 

012727 
000000 
013727 
COOOOO 
005367 
001375 
005367 
001367 

005737 
001416 
000240 
012737 

104455 

000007 
024212 
027222 

104406 

013700 
104451 

104410 
000062 

017464 
032764 
001021 
000240 
012737 
012737 

104455 

000010 
024233 
027026 

104406 



002316 



000340 
030656 
000004 
000003 

000010 

000002 



000031 
002116 
177772 
177756 

002316 

025647 002330 



Tl. 
10 » 



002332 



000002 000012 15 » 
004000 000012 



004000 002334 
0i!S670 002330 
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C»BSUB 
TRP4fG 

•VEC4 . •TRAP4 . •PRI07 

•PRI07.-(SP) 

•TRAP4.-(SP) 

«VEC4.-(SP) 

•3.-CSP) 

CISVEC 

♦10. SP 

aTUSA(R4) 

25. 

425..(PC)» 
0 

L»DLY.(PC)» 
0 

-6(PC) 
.-4 

-22(PC) 
.-20 

TRP4FG 
15* 

♦CTRL.FRUIS 

7.EMSG7.PRIERR 

CIERDF 

7 

EnSG7 
PRIERR 

C»CLP1 

LOGUNT 

LOGUNT.RO 

C<OODU 

SUB 

CIESCAPE 
L10015-. 

sruSA(R4).TUSASV(R4> 

«B.S1.TUSASV(R4) 

161 

«B.S1.SAEXP 

OLSCT.FRUIS 

8..Et1SG8.PRISA 

C*ERDF 

6 

EMSGS 
PRISA 

C»CLP1 
LOGUNT 



;Cl.bAR NXn ERROR FLAG 

I SET VECTOR 4 FOR NXri TRAPS 



iREAO THE SA REGISTER 
iUAIT TO ALLOW NXH TRAP 



;IF NXM DID NOT OCCUR 
J THEN CONTINUE TEST 

: IDENTIFY FAILING FRU FOR PRINTOUT 
!"NXM ON FIRST READ OF SA" 



:L00P ON ERROR? 
:DR0P UNIT IF NOT 

! LEAVE TEST 



;GET A COPY OF SA IN MEMORY 

I IF STEP 1 BIT IS SET 

! THEN TEST 1 IS COMPLETE 

{LOAD "EXPECTED FOR PRINTOUT 

I IDENTIFY FAILING FRU FOR PRINTOUT 

i"SA REG IN ERROR ON FIRST READ" 



:LOOP ON ERROR? 
:OROP UNIT IF NOT 
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TEST I: EXISTENCE VERIFICATION TEST 



2870 
28-'l 
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2072 
2673 
2S74 



2875 
2876 
2877 
2878 
2879 
2880 
2881 
2882 



2883 
2884 
2885 
2886 
2887 



2888 



034434 


013700 


002332 


MOV 


LOGUNT .RO 


034440 


104451 




TRAP 


CIDODU 


034442 




ESCAPE 


SUB 


034442 


104410 




TRAP 


C*ESCAPE 


034444 


000002 




.WORD 


L10015 . 


034446 




16$ : 


ENOSUB 




034446 




L10015: 






034446 


104403 




TRAP 


CIESUB 


034450 


005037 


002334 20« : 


CLR 


SAEXP 


034454 






CLRVEC 


♦VEC4 


034454 


012700 


000004 


MOV 


♦VEC4 , RO 


034460 


104436 




TRAP 


C«CVEC 


034462 


032764 


000001 000014 


BIT 


•ORPrLG.L 


034470 


OOlOO^i 




BNE 


251 


034472 


00533' 


OOOOOOG 


DEC 


ITRCNT 


034476 


000240 




NOP 




034500 


00140? 




BEQ 


25 1 


034502 


000137 


034044 


JMP 


Tl . 1 


034506 




25t: 


EXIT 


TST 


034506 


104432 




TRAP 


CIEXIT 


034510 


000002 




.WORD 


L 10013 








.EVEN 




034512 






ENOTST 




034512 




L10013: 






034512 


104401 




TRAP 


CIETST 



J LEAVE TEST 



: CLEAR ERROR INDICATOR 
{RESTORE VECTOR 4 



IF UNIT DROPPED 

THEN LEAVE NOW 
IF ITERATIONS EQUAL 0 

THEN LEAVE TEST 

ELSE GO BACK FOR MORE 
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TEST 2: INITIALIZATION TEST (POWER UP HICROOIACNOSTICS) 



SEQ SI 



2691 

2895 
2896 
2897 
2890 
2899 
2900 
2901 
2902 
2903 
2904 
2905 
2906 
2907 
2911 
2912 

2913 
2914 
2915 
2916 



2917 
2918 
2919 
2920 
2921 
2922 
2923 
2924 
2925 
2926 
2927 
2928 
2929 
2930 
2931 
2932 
2933 
29S4 
2935 
29S6 
2937 
2938 
2939 
2940 
2941 
2942 
2943 



2944 
2945 



.SBTTL TEST 2: INITIALIZATION TEST (POUCR UP rilCROOIAGNOSTICS) 



034514 
034514 

034514 
034522 
034524 
054524 
034526 
034530 
034536 
034544 
034552 
034554 

034562 
034566 
034574 
034602 
034606 
034612 
034620 
034626 

034634 
0M642 
034650 
034656 
034664 
034672 

034700 
034704 
034710 

054712 
034712 
034714 
034716 
034720 

034722 
034722 

034724 



032764 
C01402 

104432 
000214 
012737 
0*2737 
022737 
001403 
012737 

012705 

016437 

006237 
006237 
013737 
052737 
012737 

012737 
012737 
012737 
112737 
01275? 
012737 

004737 
005737 
001412 



104455 

000011 
024271 
027002 

104406 



! ! ' 



jTEST 2 



- INITIALIZATION TEST (POUER UP HICROOIAGNOSTICS) 
THIS TEST COnriENCES STEP 1 OF THE UO-PORT INITIALIZATION 
SEQUENCE WITH INTERRUPTS DISABLED. AS A RESULT. THE ROM 
RESIDENT MICR00IAGN051 ICS UILL BE RUN TO COMPLETION AND 
CHECKED FOR ANY ERRORS. 



T2: 



000001 000014 



025632 
000001 
000001 



002330 It: 

0000006 

002312 



000012 OOOOOOG 



000000 
000001 
000004 
002272 
002272 
002272 
104400 
005700 

060050 
010211 
000000 
000040 
000000 
040000 

031330 
002340 



002336 
002272 



002306 
002272 
002302 

002274 
002304 
002276 
002307 
002300 
002310 



2t. 



BGNTST 



BIT 

BEQ 

EXIT 

TRAP 

.ilORD 

NOV 

nov 

CMP 
BEQ 
NOV 

MOV 
MOV 
MOV 
ASR 
ASR 
MOV 
BIS 
MOV 

MOV 

MOV 

MOV 

MOVB 

MOV 

MOV 

JSR 
TST 
BEQ 

ERRDF 

TRAP 

.UORO 

.WORD 

.UOftO 

CKLOOP 

TRAP 

OODU 



«0RPFLG.LUNrLG(R4) 
1« 

TST 

CIEXIT 

L10016-. 

•LESI.FRUIS 

•1 . ITRCNT 

»1.PASCNT 

2« 

#10. .ITRCNT 

«0.R5 

♦I.INISTP 

TUVEC(R4).STPTBL 

STPTBL 

STPTBL 

3TPTBL.CMPT8L.4 
•104400. S'PTBL 
#6.Sl!B.aB!6.0I!B. 

•COMMAR, STPTBL. 2 
•010211.CMPT8L.2 
♦0. STPTBL »4 
♦40.CMPT8L*5 
•0. STPTBL. 6 
•040000. CMPTBL. 6 

PC.STEPl 

STEPST 

T2EXT 

9. .EMSG9.PRIINI 

C«EROF 

9 

EMSG9 
PRIINI 

C»CLP1 
LOGUNT 



IF UUT NOT DROPPED 
THEN 00 TEST 
ELSE GET OUT 



{FAILING FRU IN CASE OF ERROR 
:SET UP FOR ONE TEST ITERATION 
sIF FIRST PASS 
i THEN START TEST 

ELSE 00 10 ITERATIONS 

SET UP R5 AS INDEX TO STEP TABLES 
STEP 1 FOR ERROR PRINTOUT 
PUT VECTOR IN STEP 1 
DIVIDE BY TUO 
DIVIDE BY FOUR 
PUT VECTOR IN STEP 3 COMPARE 
REST OF STEP ONE 
OD!B, MP. CMPTBL 

I STEP i COMPARE VALUE 
sSTtr 2 COMM AREA ADDRESS 
J STEP 2 COMPARE 
sSTEP 3 - HIGH ADDRESS 
:REST OF STEP 3 COMPARE 
J STEP 4 

:STEP 4 COMPARE 



;G0 00 IT 

:IF STATUS OKAY 

J THEN DO NEXT TEST 

j'SA CONTENTS IN ERROR' 



sLOOP ON ERROR? 
{DROP UUT 



HAROUAAE TEST nACRO VOS.OS Uirtfnasday 09-0ct-8S 10:06 
TEST 2 INITIALIZATION TEST (POUER UP niCROOIACHOSTICS) 
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2^7 
?948 



2949 
2950 



2951 



0S4724 01S700 002SS2 
0547S0 104451 



10441C 



054752 

C t4 752 

054754 000006 
054756 

054756 104452 
054740 000002 

054742 
054742 

054742 104401 



TRAP 

ESCAPE 

TRAP 

.WORD 

T?EXT: EXIT 
TRAP 
.WORD 



L10016: 



ENOTST 
TRAP 



LOGUNT.RO 

CIDOOU 

TST 

C (ESCAPE 
L 10016 . 

1ST 

CIEXIT 
L 100 16-. 



CIEIST 



SEQ 62 



s LEAVE TST 



HAROUARE TEST MACRO V05.03 
TEST 3: INITIALIZATION TEST 

2954 

2959 
2960 
2961 
2962 
2963 
2964 
2965 
2966 
2967 
2968 
2969 
2970 
2971 
2972 
2976 



U«dr««»d«y 09-0ct-65 10:06 P*9* 63 



.SBTTL TEST 3: INITIALIZATION TEST 



SEQ S5 



TEST 3 



- INITIALIZATION TEST 

THIS TEST COHHENCES THE UQ-PORT INITIALIZATION SEQUENCE 
WITH INTERRUPTS DISABLED. IT VERIFIES THAT ALL STEP 
TRANSITICmS OCCUR UITHIN THE ALLOTEO TINE, AND THAT ALL 
HOST SUPPLIED INFORMATION IS ECHOED BY THE UUT. THE 
PROGRAM FURTHER VERIFIES THAT NO INTERRUPTS OCCUR AS A 
RESULT OF THE STEP TRANSITIONS. 



0077 


f\XM. "J A A 
















fiXAtAA 








1 A ; : 






C7 r B 
















9O70 


C\%ATAA 






AAAAI A 




ftTT 








i\i\\Af\0 








DCU 


1 i 
X * 


3QA 1 












CAX 1 


TQT 




r%XAlKA 












r*FVTT 
UfCAX 1 




f%%A7%S>. 












1 1 A A 17- 

1m. XWVX * • 




'Ov 


vXC 'Of 


AAAAA 1 


AAAAAAC 


It. 




A\ TTRrNT 
vx • X I ni^n 1 


C TO J 


CWA 7t^t% 




AAAAA1 






PHP 


vx • r nsw^ I 


3 OA/ 




AA4 AtW 








APQ 








fli 37^7 
Vic ' J ' 


AAAAI O 


AAAAAAf^ 




MAX/ 


A1A TTQCMT 
vx V ■ ff X I nwn 1 


2986 
















2987 


035004 


012705 


000000 




2«: 


MOV 


•0.R5 


2988 


035010 


012737 


000001 


002336 




MOV 


♦l.INISTP 


2989 


035016 


016437 


000004 


002272 




MOV 


TUVECCR4).STPTBL 


2990 


035024 


006237 


002272 






ASR 


STPTBL 


2991 


035030 


006237 


002272 






ASR 


STPTBL 


2992 


035034 


013737 


002272 


002306 




MOV 


STPTBL. CMPTBL*4 


2993 


035042 


052737 


104400 


002272 




BIS 


«104400, STPTBL 


2994 


OSSOSO 


012737 


005700 


002302 




MOV 


«6.S1!B.Q6!B.DI!8.0D 


2995 
















2996 


035056 


012737 


060050 


002274 




MOV 


«COMMAR. STPTBL «2 


2997 


035064 


012737 


010211 


002304 




MOV 


9010211. CMPTBL»2 


2998 


035072 


012737 


000000 


002276 




MOV 


^•O. STPTBL ^4 


2999 


035100 


112737 


000040 


002307 




MOVB 


»40.CMPT8L»5 


3000 


035106 


012737 


000000 


002300 




MOV 


•0. STPTBL «6 


3001 


035114 


012737 


040000 


002310 




MOV 


#040000. CMPTBL*6 


3002 
















3003 


035122 


004737 


031330 






JSR 


PC.STEPl 


3004 


035126 


005737 


002340 






TST 


STEPST 


3005 


035132 


001415 








BEQ 


51 


3006 
















3007 


035134 


012737 


025632 


002330 




MOV 


«LESI.FRUIS 


3008 


035142 










ERROF 


9. .EMSG9.PRIINI 




0S5142 


104455 








TRAP 


CIEROF 




055144 


000011 








.UORO 


9 




035146 


024271 








.WORD 


EMSG9 




035150 


027002 








.UORO 


PRIINI 


3009 


0SSIS2 










CKLOOP 





IF UUT NOT DROPPED 
THEN DO .EST 
ELSE GET OUT 



SET UP FOR ONE TEST ITERATION 
IF FIRST PASS 

THEN START TEST 

ELSE DO 10 ITERATIONS 

SET UP as AS INDEX TO STEP TABLES 
STEP 1 FOR ERROR PRINTOUT 
PUT VECTOR IN STEP 1 
DIVIDE BY TUO 
DIVIDE BY FOUR 
PUT VECTOR IN STEP 3 COMPARE 
REST OF STEP ONE 
1P.CMPTBL 

J STEP 1 COMPARE VALUE 
iSTEP 2 - COMM AREA ADDRESS 
:STEP 2 COMPARE 
:STEP 3 - HIGH ADDRESS 
J REST OF STEP 3 COMPARE 
;S7EP 4 

iSTEP 4 COMPARE 

:G0 DO IT 

;IF STATUS OKAY 

{ THEN CONTINUE TEST 

{FAILING FRU IN CASE OF ERROR 
{"SA CONTENTS IN ERROR" 



J LOOP ON ERROR? 



HARDWARE TEST MACRO V0S.03 U«4n««day 09-0ct-85 10:06 
TEST 5: INITIALIZATION TEST 





035152 


104406 








TRAF 


3010 


035154 










DOOv 


035154 
035160 


013700 
104451 


002332 






MOV 
TRAP 


3011 


035162 
035162 
035164 


104410 

000174 








ESCAPE 

TRAP 

.UORD 


3012 














3013 


035166 


005237 


002336 




5»: 


INC 


3014 


035172 


062705 


000002 






ADD 


3015 


035176 


012737 


000100 


002346 


61: 


nov 


3016 


035204 


016537 


002302 


002334 




nov 


3017 


035212 


012737 


037200 


002344 


7»: 


nov 


3016 


035220 


017464 


000002 


000012 




nov 


3019 


035226 


022705 


000006 






CMP 


3020 


035232 


001005 








BNE 


3021 


035234 


033764 


002334 


000012 




BIT 


3022 


035242 


001027 








BNE 


3023 


035244 


000404 








BR 


3024 

302L 


035246 


C23764 


002334 


000012 


61: 


CMP 


035254 


001422 








BEQ 


3026 


035256 


004737 


031302 




9$: 


JSR 


3027 


035262 


005737 


002350 






TST 


3028 


035266 


001751 








BEQ 


3029 














3030 


035270 


012737 


025670 


002330 




MOV 


3031 


035276 
035276 
035300 
035302 
035304 


104455 

000015 
024271 
027002 








ERROF 
TRAP 

.WORD 
.UORD 
.UORD 


3032 


035306 
035306 


104406 








CKLOOP 
TRAP 


3033 


035310 










OODU 




035310 


013700 


002332 






MOV 




035314 


104451 








TRAP 


3034 


035316 
035316 
035320 


104410 
000040 








ESCAPE 

TRAP 

.UORD 


3035 














3036 


035322 


016574 


002272 


000002 


10): 


MOV 


3037 


035330 


022705 


000006 






CMP 


sose 


035334 


001314 








BNE 


3039 














3040 


035336 


032764 


000001 


000014 




BIT 


3041 


035344 


001003 








BNE 


3042 


035346 


005337 


OOOOOOG 






DEC 


3043 


035352 


001214 








BNE 


3044 














3045 


035354 
035354 
035356 


104432 

000002 






T3EXT: 


EXIT 
TRAP 
.UORD 


3046 














3047 


035360 
035360 
035360 


104401 






L 10017: 


ENOTST 
TRAP 
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C»CLP1 

LOGUNT 

LOGUNT.RO 

ClOOOU 

TST 

C»ESCAPE 
L10017-. 

INISTP 
*2.RS 

•100. OUTER 

CMPTBL(R5).SAEXP 

*16000.. INNER 

aTUSAC R4 ) , TUSASV( R4 ) 

•6.RS 

8) 

SAEXP.TUSASV(R4) 

10« 

9» 

SAEXP.TUSASV(R4) 
10 » 

PC.PDELAY 

TOUT 

7» 

♦LSCT.FRUIS 

13..EMSG9.PRIINI 

OEROF 

13 

EMSG9 
PRIINI 

C»CLPl 

LOGUNT 

LOGUNT.RO 

CIDODU 

TST 

CtESCAPE 
L10017-. 

STPTBL(R5).8TUSA(R4) 

«6.RS 

51 

«DRPFLG . LUNFLGC R4 ) 

T3EXT 

ITRCNT 

2t 

TST 

C«EXIT 
L10017-. 



S£Q 84 



:0ROP UUT 
J LEAVE TST 



} ADJUST STEP COUNTER 

(ADJUST TABLE INDEX 

J SET UP FOR DELAY ROUTINE 

I SET UP FOR COMPARE 

J SET UP INNER 

iGET SA CONTENTS 

;ARE UE IN STEP 47 

: BRANCH IF NOT 

sJUST LOOK FOR STEP 4 BIT 

sIT'S SET SO LET'S GO 

iSTAY IN LOOP OTHERWISE 

J IF SA IS UHAT UE EXPECT 

: THEN MOVE ALONG 

: ELSE GIVE UUT SOME TIME 

sIF NO TIMEOUT YET 

: THEN GO TAKE ANOTHER LOOK 

: FAILING FRU IN CASE OF ERROR 
i"SA CONTENTS IN ERROR" 



.-URITE NEXT STEP TO UUT 
;IF NOT IN STEP 4 
iGO BACK TO MAIN LOOP 

:HAS UUT BEEN DROPPED 
: LEAVE NOW IF SO 
;IF MORE ITERATIONS LEFT 
: THEN GO 00 IT AGAIN 



C»ETST 



HARDWARE TEST MACRO V05.03 U*dn««tfay 09-0ct-85 10:06 Pag* 65 
TEST 4: SA RECISTEH URAP TEST 



SEQ 85 



5050 
5054 
3055 
3056 
3057 
3056 
3059 
3060 
5061 
3062 
3063 
3064 
3065 
3066 
3067 



.S8TTL TEST 4: SA REGISTER URAP TEST 



TEST 4 



- SA REGISTER URAP TEST 

THIS TEST WILL INITIALIZE THE UUT BY URITING TO ITS 
IP REGISTER. IT WILL FORCE THE UUT intq DIAGNOSTIC 
URAP nODE. AND URITE FIRST A FLOATING 0 DATA PATTERN. 
FOLLOUED BY A FLOATING 1 DATA PATTERN TO THE SA REG. 
EACH URITE UILL BE FOLLOUED BY A READ AND COMPARE 
OPERATION. 



3071 


03SS62 










BGNTST 






035362 








T4: : 






3072 
















3073 


035362 


004757 


O^o704 






JSR 


PC.CHKCAC 


3074 


035366 


C52764 


"OOOOl 


000014 




BIT 


«ORPFLG . LUNFLGCRA ) 


3075 


035374 


001402! 








BEQ 


It 


3076 


035376 










EXIT 


TST 




055576 


104452 








TRAP 


C»EXIT 




055400 


000522 








.UQRO 


L 10020 -. 


3077 


055402 


012757 


000001 


002556 


11: 


nov 


♦1 , INISTP 


3079 


055410 


012757 


000001 


OOOOOOG 




NOV 


♦l.ITRCNT 


3079 


055416 


022737 


000001 


002512 




CMP 


*1.PASCNT 


3000 


055424 


001405 








BEQ 


21 


30S1 


055426 


012757 


000002 


OOOOOOG 




MOV 


♦2.ITRCNT 


3002 
















3003 


055454 


012737 


140000 


00££34 


2*: 


MOV 


«6IT15!B.WR,SAEXP 


5004 


035442 


013757 


002554 


002272 




MOV 


SAEXP.STPTBL 


3005 


035450 


004757 


051550 






JSR 


PC.STEPl 


3006 
3007 


0S5454 


005737 


002340 






TST 


STEPST 


3000 


035460 


001415 








BEQ 


5t 


3009 
















5090 


035462 


012757 


025647 


002330 




MOV 


*CTRL.FRUIS 


5091 


035470 










ERROF 


9. .EMSG9,PRIINI 




035470 


104455 








TRAP 


C»ER0F 




035472 


000011 








.WORD 


9 




03»>474 


024271 








.WORD 


EMS69 




055476 


027002 








.WORD 


PRIINI 


3092 


035500 










CKLOOP 






035500 


104406 








TRAP 


C»CLP1 


5095 


035502 










DOOU 


LOGUNT 




0SS502 


013700 


002352 






MOV 


LOGUNT.RO 




035506 


104451 








TRAP 


CtDODU 


5094 


035510 










ESCAPE 


TST 




O3S510 


104410 








TRAP 


C»ESCAPE 




03S^1<! 


000410 








.WORD 


L 10020 -. 


3095 
















3096 


035514 


012757 


000100 


002346 


5»: 


MOV 


♦100, OUTER 


3097 


055522 


012757 


006000 


002344 


61: 


MOV 


«6000. INNER 


3096 


05555C 


017464 


000002 


000012 




MOV 


STUSAC R4 ) . TUS AS V ( R4 ) 


3099 


055556 


025764 


002354 


000012 




CMP 


SAEXP.TUSASVCRA) 


3100 


055544 


001422 








BEQ 


10$ 



;IF UUT NOT DROPPED 
i THEN DO TEST 
I ELSE GET OUT 



STEP 1 FOR ERROR PRINTOUT 
SET UP FOR ONE TEST ITERATION 
IF FIRST PASS 

THEN START TEST 

ELSE DO 2 ITERATIONS 

J SET UP STEP 1 FOR DIAG. WRAP MODE 
;PUT IT IN STEP 1 OF TABLE 
;G0 DO IT 

J IF STATUS OKAY 

I THEN CONTINUE TEST 

J FAILING FRU FOR PRINTOUT 
t"SA CONTENTS IN ERROR" 



:LOOP ON ERROR? 
I DROP UUT 

I LEAVE TST 



;SET UP FOR DELAY ROUTINE 

jSET up IKnER 

iGET SA CONTENTS 

:IF SA IS WHAT WE EXPECT 

! THEN MOVE ALONG 



HMtOUARE TEST MACRO V0S.03 U«dn««day 
TEST 4: SA RCCXSTEft WRAP TEST 



3101 
3102 
3103 
3104 
3105 
3106 



3107 
31CS 

31A^ 



3110 
3111 
3112 
3113 
3114 
311S 
3116 
3117 
3116 
^1?9 
3120 
3121 
3122 
3123 
3124 
3125 
3126 



3127 
312^ 

3129 



3130 
3131 
3132 
3133 

3136 
3137 
3138 
3139 



035S46 
03SS52 
03SSS6 

035560 
035366 
035566 
035570 
035572 
035574 
035576 
035576 
335600 
035600 
035604 
035606 
035606 
035610 

C3S612 
035614 
035622 
035630 
035636 

0S5644 

035652 
035660 
035666 
035670 
035674 
035700 

035702 
035710 
035710 
035712 
035714 
035''16 
035720 
035720 
035722 
035722 
035726 
035730 
035730 
035732 

035734 
035740 

035742 
035750 
035756 
035764 



004737 
OC!737 
001761 



104406 

013700 
104451 

104410 

000312 

C00261 
012737 
013774 
013737 
012737 

012737 
017464 
023764 
001422 
004737 
005737 
001761 



104406 

01^700 
104451 

104410 

000170 

006137 
103730 

012737 
013774 
013737 
Ui2737 



031302 
002350 



012737 025647 002330 

104455 

000012 
024271 
027002 



002332 



177776 
002342 
002342 
000100 

006000 
000002 
002334 

031302 
002350 



002342 
000002 
002334 
002346 

002344 
000012 
000012 



012737 025647 002330 

104455 

000013 
024316 
027002 



002332 



002342 



000001 
002342 
002342 
000100 



002342 
000002 
002334 
002546 



035772 012737 006000 002344 
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PC.POELAY 

TOUT 

6* 

•CTRL.FRUIS 

10. .EnSG9.PRIINI 

C»EROF 

10 

EKSG9 
PRIINI 

C»CLP1 

LOGUNT 

LOGUNT.RO 

CtDOOU 

TST 

CtESCAPE 
L 10020 -. 



#177776. UROAT A 
URDATA.8TUSA(R4) 
URDATA.SAEXP 
•100, OUTER 

•6000. INNER 
BTUSACR4 ) . TUSASVC R4 ) 
SAEXP.TUSASV(R4) 
201 

PC.POELAY 

TOUT 

15« 

•CTRL.FRUIS 

11. .EMSGIO. PRIINI 

C«EROF 

11 

EnSGlO 
PRIINI 

C(CLP1 
LOGUNT 

l(m:unt.ro 

CtDODU 
TST 
C (ESCAPE 
L10020- . 

URDATA 
111 

•1. UROAT A 
URDATA.STUSA(R4} 
•-•POATA.SAEXP 
•100. OUTER 

•6000. INNER 



SEQ 86 



: ELSE GIVE UUT SOME TII« 

:IF NO TIMEOUT YET 

, THEN GO TAKE ANOTHER LOOK 

{FAILING FRU FOR PRINTOUT 
."SA CONTENTS IN ERROR" 



SET CARRY BIT 

SET UP FLOATING "0" PATTERN 
SEND DATA TO UUT 
SAVE A COPY FOR COMPARE 
SET UP FOR DELAY ROUTINE 

INNER TOO 
READ SA 

IF DATA MATCHES 

THEN CHANGE DATA 

ELSE GIVE UUT SOME TIME 
IF NO TIMEOUT YET 

THEN GO TAKE ANOTHER LOOK 

FAILING FRU FOR PRINTOUT 
"SA WRONG IN DATA URAP" 



;GET OUT IF NOT LOOPING 



J SHIFT TEST PATTERN 
: WE'RE NOT DONE YET 

iSET UP FOR FLOATING 1 PATTERN 
iSEND DATA TO UUT 
I KEEP A COPY FOR COMPARE 
:SET UP FOR DELAY ROUTINE 

: DELAY ROUTINE TOO 
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TEST 4: SA REGISTER URAP TEST 



SEQ 0 7 



3140 
3141 
3142 
3143 
3144 
3145 
3)46 
3147 
3145 



3149 
3150 

3151 



3152 
3153 
3154 

3l^•: 

3156 
3157 
3158 
3159 
3160 
3161 
3162 



3163 
3164 



036000 


017464 


000002 


000012 




MOV 


8TU^ACR4 ) , TUSASV(R4 ) 


:REAO THE SA 


036006 


023764 


002334 


000012 




cnp 


SAEXP.TUSASV(R4) 


J IF IT MATCHES 


036014 


001422 








BEQ 


30t 


1 THEN SEE IF UE'RE DONE 


036016 


004737 


031302 






JSR 


PC.POELAY 


: ELSE GIVE UUT SOME MORE TIME 


036022 


005737 


002350 






TST 


TOUT 


sIF NO TIMEOUT YET 


036026 


001761 








BEQ 


25 1 


1 THEN TAKE ANOTHER LOOK 


036030 


012737 


025647 


002330 




nov 


•CTRL.FRUIS 


;FAILING FRU FOR PRINTOUT 


036056 










ERROF 


12. .EMSGIO.PRIINI 


:''SA WRONG IN DATA URAP- 


036036 


104455 








TRAP 


CtEROF 




036040 


000014 








. UORO 






036042 


C24316 








.UORO 


EMSGIO 




036044 


027002 








.UORO 


PRIINI 




036046 










CKLOOP 






036046 


104406 








TRAP 


C»CLP1 




036050 










OOOU 


LOGUNT 




036O9O 


013 70O 


002932 






nov 


LUbUNT ,HV 




036054 


104451 








TRAP 


CtDOOU 




036056 










ESCAPE 


TST 


{LEAVE TEST IF NOT LOOPING 


036056 


104410 








TRAP 


C«ESCAPE 




036060 


000042 








.WORD 


L10020-. 




036062 


006137 


002342 




30<: 


ROL 


URDATA 


! SHIFT DATA PATTERN 












DLL 




• UP 'DP KlHT r\nk>P VPT 

J He Nc nu 1 uunc tc i 


'•:6070 


005337 


OOOOOOG 






DEC 


ITRCNT 


sIF ITERATIONS - 0 


056074 


001402 








BEQ 


T4EXT 


s THEN LEAVE TEST 


036076 


000137 


035434 






JUP 


21 


: ELSE DO ANOTHER ONE 


036102 


005737 


OOOOOOG 




T4EXT: 


TST 


CPFLG 


i CHECK IF CACHE UAS DISABLED 


036106 


001403 








BEQ 


EXT 


:N0. BRANCH 


036110 


042737 


000014 


177746 




BIC 


»DISCAC.CCR 


t RE -ENABLE CACHE 


036116 








CXT: 


EXIT 


TST 


tGET OUTTA HERE 


036116 


104432 








TRAP 


C»EXIT 




036120 


000002 








.UORO 


L10020- . 




036122 










ENOTST 






036122 








L10020: 








036122 


104401 








TRAP 


C»ETST 





HARDWARE TEST 
TEST 5: 

3167 
3168 
3172 
3173 
3174 
3175 
3176 
3177 
3176 
3179 
3160 
31S1 
3162 
3103 
3164 
3168 



nACRO V05.03 Wednesday 09 Oct-8S 10:06 Pa9« 67 



SEQ 



.SBTTL TEST 5: 

.SBTTL SUBTEST 1: VECTOR AND INTERRUPT TEST 



t i< 



jTEST 5 

; SUBTEST 1 - 

t VECTOR AND INTERRUPT TEST 

s TEST 3 IS REPEATED. BUT WITH INTERRUPTS ENABLED, 

i THE PROGRAM VERIFIES THAT AN INTERRUPT OCCURS AT 

I THE END OF STEPS 1 - 3. 



3169 


036124 
036124 








T5: : 


BGNTST 


3190 


036124 

03fel?* 
036124 


104402 






T5,l: 


BGNSUB 
TRAP 


3191 














3192 


036126 


032764 


000001 


000014 




BIT 


3193 


036134 


001402 








A 

BEQ 


3194 


036136 
036136 
036140 


• AVI 

104432 
001114 








EXIT 
TRAP 

1 AAA A 

.UORD 


3195 


036142 


042764 


000004 


A AAA ■ M 

000014 


1* ! 


BIG 


3196 


036150 


012737 


025647 


AA*^ WA 

002330 




nov 


3197 


036156 


012737 


000001 


AAAAAA^ 

OOOOOOG 




MOV 


91tq 












CMP 


3199 


036172 


001403 








BEQ 


3200 


036174 


012737 


000012 


OOOOOOG 




MOV 


3201 














3202 


036202 


004737 


031212 




2t: 


JSR 


3203 


036206 


012705 


000000 






MOV 


3204 


036212 


012737 


000001 


002336 




MOV 


3205 


036220 


016437 


000004 


002272 




MOV 


3206 


036226 


006237 


002272 






ASR 


3207 


036232 


006237 


002272 






ASP 


3206 


036236 


013737 


002272 


002306 




MOV 


3209 


036244 


052737 


104600 


002272 




BIS 


3210 


036252 


012737 


OOS700 


002302 




MOV 


3211 














3212 


036260 


012737 


060050 


002274 




MOV 


3213 


036266 


012737 


010211 


002304 




MOV 


3214 


036274 


012737 


000000 


002276 




MOV 


3215 


036302 


052737 


000200 


002306 




BIS 


3216 


036310 


112737 


000040 


002307 




MOVB 


3217 


036316 


012737 


000000 


002300 




MOV 


3216 


036324 


012737 


040000 


002310 




MOV 


3219 












JSR 


3220 


036332 


004737 


031330 






3221 


036336 


005737 


002340 






TST 


3222 


036342 


001412 








BEQ 


3223 














3224 


036344 










ERROF 



CIBSUB 

•0RPFLG.LUNFLG(R4) 
1« 

TST 

CIEXIT 
L10021-. 

•BRFLAG,LUNFLG(R4} 

♦CTRl.FRUIS 

•1 . TTRCNT 

*i PaSCNT 
21 

♦10. .ITRCNT 

PC. VECTOR 

♦0.R5 

♦l.INISTP 

TUVEC(R4),STPTBL 

STPTiti. 

STPTBL 

STPTBL.CMPTBL*4 
«104600. STPTBL 
«B.Sl!B.aB!B.DI!B.OD!B, 

♦COMMAR. STPTBL* 2 
•010211.CMPTBL*2 
#0. STPTBL U 
•8.IE.CMPTBLU 
♦40.CMPTBL»5 
♦0. STPTBL ^6 
•040000 CMPTBL*6 

PC. STEP 1 

STEPST 

5) 

14..EMSG9,PRIINI 



IF UUT NOT DROPPED 
THEN DO TEST 
ELSE GET OUT 



iDO TEST WITH PRIORITY SET TO 0 
FAILING FRl! IN CASE OF ERROR 
SET UP FCW U« TEST ITERATION 
IF FIRST PASS 
1»EH START TEST 
ELSE DO 10 ITERATIONS 

SET UP VECTOR WITH INTERRUPT HANDLER 
SET UP RS AS INDEX TO STEP TABLES 
STEP 1 FOR ERROR PRINTOUT 
PUT VECTOR IN STEP I 
DIVIDE BY TWO 
DIVIDE BY FOUR 

PUT VECTOR IN STEP 3 COMPARE 
REST OF STEP ONE 
MP.CMPT8L 

STEP 1 COMPARE VALUE 
STEP 2 - COMM AREA ADDRESS 
STEP 2 COMPARC 
STEP 3 - HIGH ADDRESS 
iSET THE INTERRUPT ENABLE BIT 
{REST OF STEP 3 COMPARE 
jSTEP 4 

sSTEP 4 COMPARE 

:G0 DO IT 

sIF STATUS OKAY 

s THEN CONTINUE TEST 

i"SA CONTENTS IN ERROR" 



HARDWARE TEST MACRO V0S.05 Utt^*«4ay 09-0ct-8S 10:06 
SUBTEST 1: VECTOR AND INTERRUPT TEST 



S225 
S226 



3227 



3220 
3229 
3230 
3231 
3232 
3233 
3234 
S23S 
3236 
3237 
323S 
3239 



3240 
3241 

3242 



3243 
3244 
3245 
3246 
3247 
324S 

3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3258 



3259 



036344 


104455 








TRAP 


036346 


COOC ' { 








.UORO 


036350 


024271 








.UORO 


036352 


027002 








.WORD 


036354 










CKLOOP 


036354 


104406 








TRAP 


036356 










OOOU 


036356 


013700 


00233c 






MOV 


036362 


104451 








TRAP 


036364 










ESCAPE 


036364 


104410 








TRAP 


036366 


000666 








.UORO 


036370 


A« t^V^ 

012737 


000100 


AA'^ V A ^ 

002946 


SI : 


nOV 


036376 


016537 


AA1 VA*% 

002502 


002334 




MOV 


036404 


012737 


037200 


AA t Vd A 

002944 


7f ; 


nov 


036412 


092764 


000002 


AAAA4 A 

000014 




D TT 

BIT 


036420 


AA • A '> '> 

001022 








BNE 


036422 


AAA W 

004797 


031902 




91 : 


JSR 


036426 


AAK^ 

C05737 


AA^ VCA 

002350 






TCT 

T5T 


0364 S2 


AA« M 

001764 








Bey 


096434 


012797 


A9C£V4 

025O92 


WA 

002990 




nov 


096442 










cNNDr 


096442 


104*55 








TDAD 


036444 


000017 








.UORO 


036446 


024344 








.WORD 


096450 


027222 








. WORU 


096452 










U'vLOUr' 


096452 


104406 








TOAD 


096454 










t\f\l\t t 
UUUU 


096454 


019700 


0029S2 






MAW 

nuv 


036460 


104451 










036462 












096462 


« A^ A 4 A 

1O4410 








TO AO 


096464 


AAAK ^A 

000570 








UADf\ 
• HUKU 


096466 


A^ A 

042764 


000002 


000014 


Iwf : 


BT^ 
BXu 


036474 


005237 


002336 






INC 


036500 


062705 


000002 






ADD 


036^04 


At £C 

016557 


002302 


002394 




nuv 


A Vd W * '% 

096512 


017464 


AAAAA*^ 

000002 


000012 




nuv 


AV^ ■ ^A 

036520 


022705 


AAA/V%£ 

OOOOOo 






Lnr 


096524 


001005 








BMP 


096526 


Q557o4 


002994 






BTT 
OX 1 


096594 


AA • A*%*% 

001022 








oNC. 












BR 


036540 


023764 


002334 


000012 


15 »: 


CHP 


036546 


001415 








BEQ 


0S65S0 


012737 


025632 


002330 




MOV 


0S6SS6 








161: 


ERRDF 


036556 


104455 








TRAP 


036560 


000020 








.WORD 


036562 


024271 








.WORD 


036564 


027002 








.WORD 


036566 










CKLOOP 



! 



P»0« 671 



SEQ 89 



CIEROf 
14 

EMSG9 
PRIINI 

CICLPl 

LOGUNT 

LOGUNT.RO 

ClOOOU 

TST 

C (ESCAPE 

L10021-. 

♦100. OUTER 
CMPT8L(R5).SAEXP 
♦16000.. INNER 
»INTFLG.LUNFLG(R4) 
101 

PC.POELAY 

TOUT 

71 

4LESI.FRUIS 

15..EMSG11,PRIERR 

CIERDF 

15 

EMSGll 
PRIERR 

CICLPl 

LOGUNT 

LOGUNT.RO 

CIDOOU 

TST 

C (ESCAPE 
L 10021 -. 

•INTFLG.LUNFLG(R4) 

INISTP 

*2.R5 

CMPTBL(R5).SAEXP 
8TUSA(R4) , TUSASVCR4 ) 
•6.R5 
151 

SAEXP.TUSASV(R4) 

201 

161 

SAEXP.TUSASV(R4) 
201 

«LESI.FRUIS 

16. .EMSG9, PRIINI 

CIEROF 

16 

EMSG9 
PRIINI 



iLOOP ON ERROR? 
iDROP UUT 

J LEAVE TST 



{SET UP FOR DELAY RUU.INE 

;SET UP FOR COMPARE 

iSET UP INNER 

sIF INTERRUPT OCCURRED 

; THEN SEE IF SA IS CORRECT 

} ELSE GIVE UUT SOME TIME 

J IF NO TIMEOUT YET 

THEN GO TAKE ANOTHER LOOK 

{FAILING FRU 

{"EXPECTED INTERRUPT DID NOT OCCUR" 



{ CLEAR THE INTERRUPT FLAG 

{ADJUST THE STEP COUNTER 

{ADJUST TABLE INDEX 

{GET THE COMPARISON VALUE 

{GET SA CONTENTS 

(ARE WE IN STEP 4? 

{BRANCH IF NOT 

{JUST LOOK FOR STEP 4 BIT 

{IT'S SET SO LET'S GO 

{ERROR 

(IF SA IS WHAT WE EXPECT 
{ THEN MOVE ALONG 

{FAILING FRU 

{"SA CONTENTS IN ERROR" 



HAROWADE TEST HACRO V05.0S M«d w d«y O9-0ct-8S 10t06 
SUBTEST 1: VECTOR AMD INTEfMUJPT TEST 



S260 



S261 



3262 
3263 
S264 
3265 
5266 
3267 
3269 
3269 
3270 
3271 
327.; 
3273 
X274 



3275 



036566 
036570 
036570 
036574 
036576 
036576 
036600 

036602 
036610 
036614 

036616 
036624 
036626 
036632 
036634 

036640 
036644 
03«<644 
036646 
036650 
036650 
036650 



104406 

013700 002332 
104451 

104410 
000454 

016574 002272 000002 
022705 000006 
001265 

032764 000001 000014 
001005 

005337 OOOOOOG 
001402 

000137 036202 

004737 031162 

104432 
000406 



104403 



20*: 



TSeXTi 



1 10022: 



TRAP 

DOOU 

nov 

TRAP 
ESCAPE 
TRAP 
.UORO 

nov 

CMP 
BNE 

BIT 
BNE 
DEC 
BEO 
JMP 

JSR 
wXIT 
TRAP 
.UORD 

ENOSUe 

TRAP 
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SFQ 90 



CICLPl 
LOGUNT 
LOGUNT.RO 
C*OOOU 

TST 

CIESCAPE 
L10021-. 

STPTBLCRS ) . 8TUSACR4 ) 

•6.RS 

5t 

MRPFLG . LUNFLGC R4 ) 

T5EXT 

ITRCNT 

T5EXT 

2» 

PC.RSTVEC 
TST 

C»EXIT 
L10021-. 



jURITE NEXT STEP TO UUT 
I IF NOT IN STEP 4 
:G0 BACK TO HAIN LOOP 

iHAS UUT BEEN DROPPED 

i LEAVE NOW IF SO 

ilF NO MORE ITERATIONS LEFT 

! THEN EXIT 

I ELSE 00 IT AGAIN 

I CATCH ILLEGAL INTERRUPTS 



CtESUB 



HAftOWARC TEST riACRO V0S.03 
SU0TEST 2: W LEVEL TEST 

5278 
52S2 
S26S 
3284 
S20S 
52M 
3»»7 
S2M 
32t9 
S290 
'Wl 
3292 
S2fi 
S2«4 
32«S 

SSOO 0SMS2 
0SM92 
0SM92 

SSOl 

SS02 09M94 
SioS 0SM62 



SS04 




so* 03*712 
SIIO 0M720 
9911 09*722 

0M790 
0M794 
0M740 

0M744 

9917 0M792 
lllf 0g7«0 

9920 0M770 
0M774 

097004 
037010 
097014 

0S70M 
09T0U 
097020 
097022 
037024 
3324 09702ft 
09702* 
S32« 037090 
037030 
037034 



104402 

092744 
001402 

104492 
000944 

052764 
012797 
012757 
022797 
001405 
012757 

106427 
004797 
012705 
012797 
016497 
006237 
006297 
052797 
016437 

004737 
005737 
001412 



104455 
000016 
024271 
027002 

104406 

013700 
104451 
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.SeTTL SUBTEST 2z BR LEVEL TEST 



SEQ 91 



I »*•••••••••••*••••••••♦•••••••*•♦•••••••••••••••••••••••' 

{subtest 2 • 

J W LEVEL TEST 

t THIS TEST INSURES THAT THE TUei CAN NOT INTERAUPT 

I UHEN THE CPU PRIORITY IS SET TO 7. THE TEST GOES 

( ONLY THROUGH THE FIRST STEP OF THE INIT SEQUENCE 

t SINCE TIC CONTROLLER UILL -HANG" UAITING FOR THE 

t INTERRUPT ACKNOULCOGC. 



I f 
tt* 



T5.2! 



000001 000014 



000004 
025647 
000001 
000001 



000014 
002330 
OOOOOOG 
002312 



II: 



000002 OOOOOOG 



000940 
091212 
000000 
000001 
000004 
002272 
002272 
104600 
000004 

031330 
002340 



21 ! 



002336 
002272 



002272 
002302 



002352 



BGNSUB 






TDA0 






BIT 


•DRPFLG.LUNFLG(R4} 


:IF UUT NOT DROPPED 


BCH 


1* 


; THEN 00 TEST 




TCT 
1 a 1 




TOAD 


ftp* TT 












MAPI AC i la^l RfRA^ 


(fin TFCT MTTM MT/M POTHRTTY 


Htm 
















a Xr ■ Xno ■ r 


BEQ 


2t 


i THEN START TEST 


NOV 


42.ITRCNT 


1 ELSE DO 10 ITERATIONS 


HTPS 


4PRI07 


J CPU PRIORITY • 7 


JSR 


PC. VECTOR 


(SET UP VECTOR UITH INTERRUPT HANDLER 


NOV 


•e.RS 


tSET UP R5 AS INDEX TO STEP TABLES 


NOV 


♦l.INISTP 


tSTEP 1 FOR ERROR PRINTOUT 


NOV 


TUVEC(R4),STPTBL 


(PUT VECTOR IN STEP 1 


ASR 


STPT8L 


1 DIVIDE BY TUO 


ASR 


STPTBL 


(DIVIDE BY FOUR 


BIS 


•104600. STPTBL 


(REST OF STEP ONE 


NOV 


TUVEC(R4).CMPT8L 


(STEP 1 CONPARE VALUE 


JSR 


PC.STEPl 


iGO 00 IT 


TST 


STEPST 


(IF STATUS OKAY 


BEQ 


5* 


( THEN CONTINUE TEST 


ERfWF 


14. .EnSG9.PRIINI 


("SA CONTENTS IN ERROR - 


TRAP 


CIEROF 


.UORD 


14 




.UORO 


ENS69 




.UQRO 


PRIINI 




CKLOOP 




iLOOP ON ERROR? 


TRAP 


CICLPl 




OOOU 


LOGUNT 


(DROP UUT 


NOV 


LOGUNT.RO 




TRAP 


C4D00U 





HAROUARE TEST MACRO V05.03 Wednesday 09 -Oct 85 10:06 
SUBTEST 2: BR LEVEL TEST 



3330 



3331 
3332 
3333 
i534 
3335 
3336 
SSS7 
3338 
3539 
3340 
3341 
3342 
3343 



3344 
3345 

3346 



3347 
3348 
3349 

3350 
3351 



3352 
3353 

3354 



3355 
3356 
3357 
3358 
3359 
3360 
3361 
3362 
3363 
3364 
3365 
3366 



037036 
037036 
037040 

037042 
037050 
02705*. 
037064 
037070 
057074 

037076 
057104 

037112 

037114 
037114 
037116 
037120 
037122 
037124 
037124 
037126 
037126 
037132 
037134 
037154 
057156 

037140 
037146 
037150 
037156 
037156 
037160 
037162 
037164 
057166 
037166 
057170 
037170 
03/174 
037176 
057176 
057200 

037202 
037206 
037210 
057212 

057220 
037226 
037230 
057254 
057256 



104410 

000214 

012737 
016537 
012737 
004737 
005737 
001770 

017464 
025764 
001412 



104455 

000021 
024271 
C27002 

104406 

015700 
104451 

104410 

000116 

032764 
001415 
0427M 

104455 
000022 
024405 
027002 

104406 

013700 
104451 

104410 
000054 

106427 
000240 
000240 
042764 

032764 

001005 
005537 
001402 
000157 



000100 002346 5*. 
002302 002334 
037200 002344 7$: 
01130? 91 ! 

002350 



000002 000012 
002334 000012 



002352 



000002 000014 10$ : 
000002 000014 



002352 



000000 

000002 000014 
000001 000014 
OOOOOOG 
056750 



20*: 



ESCAPE 

TRAP 

.WORD 

nov 

MOV 
MOV 
JSR 
TST 
6EQ 

MOV 

cnp 

BEQ 

ERRDF 

TRAP 

.WORD 

.WORD 

.WORD 

CKLOOP 

TRAP 

OODU 

MOV 

TRAP 

ESCAPE 

TRAP 

.WORD 

BIT 

BEQ 

BIC 

ERRDF 

TRAP 

.UORD 

.WORD 

.WORD 

CKLOOP 

TRAP 

DOOU 

MOV 

TRAP 

ESCAPE 

TRAP 

.WORD 

MTPS 
NOP 
NOP 
BIC 

BIT 
BNE 
DEC 
BEQ 
JMP 
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SEQ 92 



TST 

C»ESCAPE 
L 10021 -. 

«100. OUTER 

CMPTBL(R5).SAEXP 

«16000. .INNER 

PC.POELAY 

TOUT 

7* 

aTUSAC R4 ) . TUSASVC R4 ) 

SAEXP.TUSASV(R4) 

10* 

17, .EMSG9.PRIINI 

C*EROF 

17 

EnSG9 
PRIINI 

C»CLP1 

LOGUNT 

LOGUNT.RO 

C«OODU 

TST 

CIESCAPE 
L 10021 -. 

«INTFLG.LUNFLGCR4) 
20* 

♦INTFLG.LUNFLGCR4) 
18.. EMSG12. PRIINI 
C*ERDF 
18 

EnSG12 
PRIINI 

C*CLP1 

LOGUNT 

LOGUNT.RO 

C*OOOU 

TST 

C*ESCAPE 
L 10021 -. 

«PRI0O 



•INTFLG.LUNFLGCR4) 

«DRPFLG , LLiNFLGC R4 ) 

ST5EXT 

ITRCNT 

ST5EXT 

2* 



; LEAVE TST 



jSET UP rCR DELAY ROUTINE 
5 SET UP FOK COMPARE 
:SET UP INNER 

: ELSE GIVE UUT SOME TIME 

J IF NO TIMEOUT YET 

I THEN GO TAKE ANOTHER LOOK 

;GET SA CONTENTS 

J IF CONTENTS OKAY 

; THEN CHECK FOR INTERRUPT 

;"SA CONTENTS IN ERROR' 



sIF NO INTERRUPT OCCURRED 

i THEN CARRY ON WITH TEST 

; CLEAR FLAG IN CASE WE'RE LOOPING 

i»INTRRPT WITH CPU PRIORITY -7" 



sCPU PRIORITY • 0 

i DELAY FOR PENDING INTERRUPT 
(CLEAR THE FLAG NOW 

iHAS UUT BEEN DROPPED 

(LEAVE NOW IF SO 

ilF NO MORE ITERATIONS LEFT 

{ THEN EXIT 

i ELSE DO IT AGAIN 



HARDWARE TEST riACRO V05.0; 
SUBTEST 2: BR LEVEL TEST 
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3367 037242 

3368 037246 
037246 
037250 

3369 

3370 037252 
037252 
037252 

3371 

3372 037254 
037254 
037254 



004737 031162 

104432 
000004 



104403 



ST5EXT: JSR 
EXI' 
TRAP 
.UORD 



104401 



L 10023: 



L 10021: 



ENOSUB 
TRAP 
ENOTST 
TRAP 



PC.RSTVEC 
TST 

C»EXIT 
L10021-. 



OESUB 



CIETS1 



i CATCH ILLEGAL INTERRUPTS 



HAROUARE TEST 
TEST 6. 

SS75 
5576 
3580 
5581 
5582 
5583 
5584 
5585 
5586 
5367 
3386 
5389 
5590 
5591 
3392 
5593 
5594 
3395 
3396 
3397 
3401 
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SEO 



.SBTTL TEST 6: 

.S8TTL SUBTEST 1: PURGE AND POLL TEST 



i i • 
i I ' 
a 



SUBTEST 6 - PURGE AND POLL TEST 

THIS TEST UILL AGAIN RUN THROUGH THE INIT SEQUENCE. THIS 
TIME SETTING THE "PURGE AND POLL' BIT IN STEP 3. THIS 
SHOULD CAUSE THE PORT TO OtIA VARIOUS DATA PATTERNS TO 
AND FROn THE COTtlUNICATIONS AREA AND FINALLY LEAVE IT 
CLEARED BEFORE TRANSITIONING TO STEP 4. THE PROGRAH UiLL 
HAVE FILLED THIS AREA WITH A BACKGROUND PATTERN OF ALL 
I'S DATA PRIOR TO STARTING THE INIT. UHNE STEP 4 IS 
REACHED. THE PROGRAH UILL VERIFY THAT THE COHH AREA IS 
ALL O'S, AND THAT THE 20 hOROS PRECEDING AND SUCCfEDING 
THE CONn AREA ARE UNTOUCHED. 



i i' 
i I < 













■ w ■ « 


BGNTST 




037256 


104402 






T6.1: 


TRAF 


3404 














5405 


037260 


032764 


000001 


000014 




BIT 


5406 


037266 


001402 








BEQ 


3407 


"37270 
037270 
037272 


104432 
001406 








EXIT 
TRAP 
.WORD 


3408 


037274 


012737 


02S647 


002330 


It: 


nov 


3409 


037302 


012737 


000001 


OOOOOOG 




flOV 


3410 


037310 


022737 


000001 


002312 




CUP 


3411 


037516 


001403 








BEQ 


3412 


037320 


012737 


000012 


OOOOOOG 




nov 


3413 














3414 


037326 


012705 


000000 




2«: 


HOV 


3415 


037332 


012737 


000001 


002336 




HOV 


3416 


037340 


016437 


000004 


002272 




MOV 


3417 


037346 


006237 


002272 






ASR 


3416 


037352 


006237 


002272 






ASR 


3419 


037356 


013737 


002272 


002306 




MOv 


3420 


037364 


052737 


111000 


002272 




BIS 


3421 


037372 


012737 


005700 


002302 




MOV 


3422 














3423 


037400 


012737 


060050 


002274 




nov 


3424 


037406 


012737 


0x0222 


002304 




NOV 


3425 


037414 


012737 


100000 


002276 




nov 


3426 


037422 


112737 


000040 


002307 




novB 


3427 


037430 


0127S7 


000000 


002300 




MOV 


3428 


037436 


012737 


040000 


002310 




MOV 


3429 














3430 


037444 


012757 


000022 


002326 




MOV 


3431 


037452 


004737 


031426 






JSR 


3432 















CtBSUB 

♦(MPFLG.LUNFLG(R4) 
It 

TST 

CtEXIT 

L 10024 -. 

»CTRL.ri»JlS 

♦1 . ITRCNT 

•l.PASCNT 

2t 

•10.. ITRCNT 

•0.R5 

♦l.INISTP 

TUVECCR4).STPTBL 

STPT8L 

STPTBL 

STPTBL.CMPTBL»4 
♦111000, STPTBL 
«e.Sl!8.QB!B.0l!B. 

KOMMAR. STPTBL •2 
•010222. CMPTBL« 2 
•B. PP. STPTBL .4 
•40.CT1PTBL»5 
♦0. STPTBL »6 
«040C0O.CMPTBL*6 

•18. .CHARLG 
PC.BAKPAT 



:IF UUT NOT DROPPED 
! THEN 00 TEST 
J ELSE GET OUT 



:FAILING FRU IN CASE OF ERROR 
:SET UP FOR ONE TEST ITERATION 
:IF FIRST PASS 
i THEN START TEST 
: ELSE DO 10 ITERATIONS 

;SET UP R5 AS IWEX TO STEP TABLES 
I STEP 1 FOR ERROR PRINTOUT 
sPUT VECTOR IN STEP 1 
sDIVIOE BY TWO 
: DIVIDE BY FOUR 
:PUT VECTOR IN STEP 3 COMPARE 
iREST OF STEP ONE 
00!B.W>.CMPTBL 

:STEP 1 COMPARE VALUE 
sSTEP 2 - COMM AREA ADDRESS 
;STEP 2 COMPARE 

sSTEP 3 HIGH ADDRESS AND PRGE/POLL 
;REST OF STEP 3 CHMPARE 
J STEP 4 

sSTEP 4 COMPARE 

s LENGTH OF COMM AREA FOR THIS TEST 
I FILL COMM AREA WITH ALL I'S DATA 



ROUARE TEST 


MACRO 


^05.05 U«tfr>*«a«y 


09 Oct 


85 lO M 


9TEST 


1: PtfiCE AND POLL TEST 








3455 






OSiSSO 






JSR 


5454 












TST 


5435 












BEQ 


5456 














3457 












ERROT 














TRAP 




OS 74 72 










.WORD 




057474 


0^4271 








.UORO 




037476 


027002 








.UORO 


3438 


V J ' 










CKLOOP 






104406 








TRAP 


5439 












OOOU 






013700 


002532 






MOV 




037506 


104451 








TRAP 


5440 


037510 










ESCAPE 




057510 


104410 








TRAP 




057512 


001166 








.UORO 


344i 














5442 


037514 


005237 


002336 




51: 


INC 


5443 


037520 


062 705 


000002 






ADD 


5444 


057524 


012737 


000100 


002346 


6t: 


MOV 


3445 


037532 


016537 


002302 


002334 




MOV 


3446 


037540 


012737 


037200 


002344 


7»: 


MOV 


3447 


037546 


017464 


000002 


000012 




MOV 


3448 


037554 


022705 


000006 






CMP 


3449 


037560 


001005 








BNE 


3450 


037562 


033764 


002334 


000012 




BIT 


3451 


037570 


001027 








BNE 


3452 


037572 


000404 








BR 


3453 


037574 


023764 


002334 


000012 


81: 


CMP 


5454 


037602 


001422 








BEQ 


3455 


057604 


004737 


031302 




91 : 


JSR 


3456 


037610 


0057S7 


002350 






TST 


3457 


037614 


001751 








BEQ 


3458 














5459 


037616 


012737 


025632 


002330 




MOV 


3460 


037624 










ERROF 


037624 


104455 








TRAP 




037626 


000024 








.WORD 




037630 


024271 








.UORO 




037652 


027002 








.UORO 


3461 


037634 










CKLOOP 


037634 


104406 








TRAP 


5462 


037636 










DODU 




037636 


013700 


002332 






MOV 




037642 


104451 








TRAP 


3463 


057644 










ESCAPE 




037644 


104410 








TRAP 




037646 


001032 








.UUKD 


3464 














3465 


0376S0 


016574 


002272 


000002 


101: 


MOV 


3466 


037656 


022705 


000004 






CMP 


3467 


037662 


001404 








BEQ 


3468 


037664 


022-»05 


000006 






CMP 


3469 


037670 


001311 








BNE 


3470 


037672 


000440 








BR 



3471 



71 I 



StO <»5 



PC.STEPl 

STEPST 

51 

19. .EMSG9.PRIINI 

CIEROF 

19 

EMSG9 
PRIINI 

CICLPl 

LOGUNT 
LOGUNT.RO 
ClOODLI 
TST 

CtESCAPE 
L10024-. 

INISTP 
♦2.R5 

•100. OUTER 

CMPTBL(R5).SAEXP 

•16000. .INNER 

8TUSA( R4 ) . TUSASVC R4 ) 

•6.R5 

8« 

SAEXP.TUSASV(R4) 

lot 

9« 

SAEXP. TUSASVC R4) 
10» 

PC.PDELAY 

TOUT 

7» 

•LESI.rRUIS 

20. .EMSG9. PRIINI 

CIEROF 

20 

EMSG9 
PRIINI 

C»CLP1 
LOGUNT 
LOGUNT.RO 
CI DODU 
TST 

CIESCAPE 
L10024-. 

3TPTBL(RS),aTUSA(R4: 

•4,RS 

151 

•6.RS 

51 

201 



;G0 DO 

J IF STATUS (XA> 

: THEN CONTINUE TEST 

:"SA CONTENTS IN ERROR- 



:LOOP ON ERROR? 
:DROP UUT 



s LEAVE TST 



ADJUST STEP COUNTER 
ADJUST TABLE INDEX 
SET UP FOR DELAY ROUTINE 
SET UP FOR COMPARE 
SET UP INNER 
GET SA CONTENTS 
ARE UE IN STEP 4? 
BRANCH IF NOT 
JUST LOOK FOR STEP 4 BIT 
IT'S SET SO LET'S GO 
STAY IN LOOP OTHERWISE 
IF SA IS WHAT UE EXPECT 
THEN MOVE ALONG 
ELSE GIVE UUT SOME TIME 
IF NO TIMEOUT YET 
s THEN GO TAKE ANOTHER LOOK 

{FAILING FRU 

i"SA CONTENTS IN ERROR" 



URITE f«XT STEP TO UUT 

IF STEP 3 

THEN DO PURGE/POLL STUFF 

IF NOT IN STEP 4 

THEN GO BACK TO MAIN LOOP 
ELSE GO CHECK RESULTS 



HARDWARE TEST 

SUBTEST 1: PLUGE AND POtL TEST 



3*72 
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SEQ <»6 



5473 
3474 
3475 
3476 



3477 
3476 

3479 



3460 
5461 
3462 
3463 
3464 
3465 
3466 
3467 
3466 
3469 
3490 
3491 
3492 



3493 



037674 








15$: 


DELAY 


1 


037674 


012727 


000001 






MOV 


#1.CPC)» 


037700 


000000 








.WORD 


0 


037702 


013727 


002116 






MOV 


L$DLY.CPC)» 


037706 


000000 








.UORD 


0 


037 710 


005367 


177772 






DEC 


-6(PC) 


037714 


001375 








BNE 


. -4 


037716 


005367 


177756 






DEC 


-22(PC) 


037722 


001367 








BNE 


. -20 


037724 


017464 


000002 


000012 




MOV 


ATI If* .% ^ A A \ Tl IC AC D A \ 


037732 


001412 








BEQ 


161 


037754 










ERRDF 


21 . .EMSGIS.PRIINI 


037734 


104455 








TRAP 


OERDF 


037736 


000025 








.WORD 


21 


037740 


024454 








.WORD 


EMSG13 


037742 


027002 








. UORO 


PRIINI 


037744 










CKLOW 




037744 


104406 








TRAP 


C*CLP1 


037746 










DOOU 


LOGUNT 


037746 


013700 


00273? 






MOV 


LOGUNT , KU 


037752 


104451 








TRAP 


CI DODU 


037754 










ESLAPc 


TCT 


037754 


104410 








TB AO 

IHnr 




037756 


000722 








. WUNU 




037760 


012774 


000000 


000002 


161: 


MOV 


«0.aTUSA(R4) 


037766 


005774 


AAAAAA 

000000 






TCT 


QTl tTOt OA \ 


037772 


000650 








DD 

BR 




037774 


004737 


0314^0 




ft . 


ICO 




040000 


032764 


A AA AA 1 

000001 


OOOOI4 




OTT 

BIT 


•0RPFLG.LUNFLGCR4) 












BNE 


T6EXT 


040010 


005337 


OOOOOOG 






DEC 


ITRCNT 


040014 


001402 








BEQ 


T6EXT 


040016 


000137 


037326 






JW» 


2« 


040022 








T6EXT: 


EXIT 


TST 


040022 


104432 








TRAP 


C«EXIT 


040024 


000654 








.WORD 


L10024-. 


040026 










ENDSUe 




040026 








L 10025: 




CtESUB 


040026 


104403 








TRAP 



iGIVE PORT SOME TIME 



J GET SA CONTENTS 
: BRANCH IF OKAY 

iSA NOT 0 IN PURGE /POLL 



sURITE O'S TO SA 
' AND READ IP 

I GO UAIT FOR NEXT TRANSITION 

GO CHECK COMM AREA 

HAS UUT BEEN DROPPED 

LEAVE NOW IF SO 

IF NO MORE ITERATIONS LEFT 

THEN LEAVE TEST 

ELSE 00 IT AGAIN 



hAROUARE TEST MACRO V0S.03 Wednesday 09 Oct 8S 10:06 
SUBTEST 2: EXTENDED ADDRESS TEST 

3496 .SBTTL SUBTEST 



3440 


040030 
040030 
040030 


10«402 






T6.2: 


BGNSUB 
TRAP 


3499 














3500 


040032 


032764 


000001 


000014 




BIT 


3501 


040040 


001407 








BEQ 


3502 


040042 
040042 
040044 


104432 
000634 








EXIT 
TRAP 
.WORD 


3503 


040046 


005737 


002314 






TST 


3504 


040052 


001002 








BNE 


3505 


040054 
040054 
040056 


104432 

000622 








EXIT 
TRAP 
.WORD 


3506 


040060 


012737 


025647 


AA*«*J 'ft A 

002 .'30 


It : 


MOV 


3507 


040066 


012737 


000001 


OOOOOOG 




NOV 


3500 


040074 


022737 


AAA A A • 

000001 


A AA*V 4 A 

002312 




CMP 


3509 


040102 


C01403 








BEQ 


3510 


040104 


012737 


000012 


OOOOOOG 




MOV 


3511 














3512 


040112 


AAA ^ V ^ 

00473 1 


031616 




A A 

2» : 




3513 


040116 


012705 


AAAAAA 

000000 




St : 


nov 


3514 


040122 


012737 


A AAAA 4 

000001 


AA*k 

002336 




nov 


3515 


040130 


016437 


AAAA A A 

000004 


002272 




nov 


3516 


040136 


006237 


002272 






ASK 


3517 


040142 


006237 


002272 






ASR 


3510 


040146 


013737 


002272 


002306 




MOV 


3519 


040154 


052737 


111000 


A A ^ ^ "*> ^ 

002272 




BIS 


3520 


040162 


012737 


AAC ^AA 

005700 


AAO V A*% 

002302 




nov 


3521 














3522 


040170 


012737 


Af A AC A 

060050 


002274 




nov 


3523 


040176 


W 

042737 


a AAAA 

160000 


002274 




BXC 


3524 














3525 


040204 


012737 


A 4 A'^f^ 

010222 


AA'^V AA 

002304 




nov 


3526 


040212 


013737 


172346 


AA'^ vet 

002352 




nov 


3527 


040220 


113737 


002353 


AA A 

002276 




novB 


3520 


040226 


006237 


AAA A'Vf 

002276 








3529 


040232 


006237 


002276 






AbK 


3530 


040236 


052737 


100000 


002276 




BIS 


3531 


040244 


112737 


000040 


002307 




MOVE 


3532 


040252 


012737 


000000 


002300 




MOV 


3533 


040260 


012737 


040000 


002310 




MOV 
















3535 


040266 


012737 


000022 


002326 




MOV 


3536 


040274 


004737 


031426 






JSR 


3537 














3530 


040300 


004737 


031330 






JSR 


3539 


040304 


005737 


002340 






TST 


SS40 


040310 


001412 








BEQ 


3541 














3542 


040312 
040312 
040314 
040316 
040320 


104455 
000031 
024271 
027002 








ERRDF 

TRAP 

.WORD 

.WORD 

.WORD 



Pao* 73 



SEQ 97 



2: EXTENDED ADDRESS ^EST 



CtBSUB 



«DRPFLG . LUNFLGC R4 } 

It 

TST 

CtEXIT 

L10024-. 

KTFLAG 

It 

TST 

CtEXIT 

L 10024 -. 

♦CTRL.FRUIS 

♦l.ITRCNT 

♦l.PASCNT 

2t 

♦10..ITRCNT 

PC.INTMHU 
«0.R5 

OI.INISTP 

TUVEC(R4).STPTBL 

STPTBL 

STPTBL 

STPTBL. CMPTBL 4 4 
♦111000. STPTBL 
«B.S1!B.QB!B.DI!B.0D!B 



«COMMAR. STPTBL *2 
•BIT15!BIT14!BIT13.STPTBL*2 

; CLEAR 

•010222. CHPTBL*2 
KPAR3.TEMP 
TEMP .l. STPTBL 44 
STPTBL ^4 
STPTBL ^4 
«6. PP. STPTBL *4 
♦40.CMPTBL»5 
♦0. STPTBL ^6 
«040000.CMPTBL*6 



:IF UUT NOT DROPPED 
1 THEN 00 TEST 
( ELSE GET OUT 



ilF MEMORY MANAGEMENT AVAILABLE 
J THEN DO TEST 
: ELSE GET OUT 



i FAILING FRU IN CASE OF ERROR 

jSET UP FOR ONE TEST ITERATION 

sIF FIRST PASS 

J THEN START TEST 

> ELSE DO 10 ITERATIONS 

INITIALIZE MMU REGISTERS 
iSET UP R5 AS INDEX TO STEP TABLES 
:STEP 1 FOR ERROR PRINTOUT 
jPUT VECTOR IN STEP 1 
2 DIVIDE BY TWO 
: DIVIDE BY FOUR 
.PUT VECTOR IN STEP 3 COMPARE 
sREST OF STEP ONE 
MP.CMPTBL 
J STEP 1 COMPARE VALUE 
.•STEP 2 - COMM AREA ADDRESS 



THE ACTIVE PAGE FIELD 
:StEP 2 COMPARE 
I GET RELOCATION VALUE 
J JUST THE HGH BYTE 
sMAKE IT THE EXTENDED 
s ADDRESS OF THE COMM AREA 
sNOW SET PURGE /POLL BIT 
sREST OF STEP 3 COMPARE 
2 STEP 4 

J STEP 4 COMPARE 



«10..CMARLG 
PC.BAKPAT 

PC.STEPl 

STEPST 

St 

25. .EMSG9.PRIINI 

CtEROF 

25 

EMSG9 
PRIINI 



s LENGTH OF COMM AREA FOR THIS TEST 
(FILL COMM AREA WITH ALL I'S DATm 

:G0 DO IT 

:IF STATUS OKAY 

t THEN CONTINUE TEST 

:''SA CONTENTS IN ERROR" 



HARDWARE TEST MACRO V05.03 U«d. «sday 09-Oct 85 10:06 
SUBTEST 2: EXTENDED ADDRESS TEST 



3543 
3544 

3545 



3546 
3547 
3540 
3549 

3550 
3551 
3552 
3553 
3554 
3555 
3556 
3557 
3550 
3559 
3560 
3561 
3562 
3563 
3564 



3565 
3566 

3567 



3560 
3569 
3570 
3571 
3572 
3573 
3574 
3575 
3576 



3577 



040322 
040322 
040324 
040324 
040330 
040332 
040332 
040334 

040336 
040342 
040346 
040354 
040362 
040370 
040376 
040402 
040404 
040412 
040414 
040416 
040424 
040426 
040432 
040436 

040440 
040440 
040442 
040444 
040446 
040450 
040450 
040452 
040452 
040456 
040460 
040460 
040462 

040464 
040472 
040476 
040500 
040504 
040506 

040510 
040510 
O«05l4 
040516 
040522 
040524 
040530 
040532 
040536 
040540 



104406 

013700 
104451 

104410 
000344 

005237 
062705 
012737 
016537 
012737 
017464 
02270!> 
001005 
033764 
001024 
C00404 
023764 
001417 
004737 
005737 
001751 



104455 

000032 
024271 
027002 

104406 

013700 
104451 

104410 

000216 

016574 
022705 
001404 
022705 
001314 
000440 



012727 
000000 
013727 
000000 
005367 
001375 
005367 
001367 
017464 



002332 



002336 51 
000002 

000100 002346 6* 
002302 002334 
037200 002344 7t 
000002 000012 
000006 

002334 000012 



002334 000012 01 : 

031302 9t: 
002350 



002332 



002272 000002 10 t: 
000004 



000006 

000001 
002116 
177772 
177756 

000002 000012 



15$: 



CKLOOP 

TRAP 

OOOU 

MOV 

TRAP 

ESCAPE 

TRAP 

.WORD 

INC 
ADD 
MOV 
MOV 
MOV 

nov 

CMP 

BNE 

BIT 

BNE 

BR 

CMP 

BEQ 

JSR 

TST 

BEQ 

ERRDF 

TRAP 

.WORD 

.WORD 

.WORD 

CKLOOP 

TRAP 

DOOU 

MOV 

TRAP 

ESCAPE 

TRAP 

.WORD 

MOV 
CMP 
BEQ 
CMP 
BNE 
BR 

DELAY 

MOV 

.WORD 

MOV 

.WORD 

DEC 

BNE 

DEC 

BNE 

MOV 



1 



Pag* 73-1 



SEQ 98 



C»CLP1 

LOGUNT 

LOGUNT.RO 

ODODU 

TST 

CIESCAPE 
L10024-. 

INISTP 

•2.R5 

♦100. OUTER 

CMPTBL(R5).SAEXP 

•16000. .INNER 

aTUSA(R4),TUSASV(R4) 

#6.R5 

81 

SAEXP.TUSASV(R4) 

101 

91 

SAEXP.TUSASV(R4) 

lot 

PC.PDELAY 

TOUT 

71 

26. .EMSG9.PRIINI 

CIERDF 

26 

EMSG9 
PRIINI 

CICLPl 
LOGUNT 
LOGUNT.RO 

ctooou 

TST 

CIESCAPE 
L10024-. 

STPTBL (R5 ) . 8TUSA(R4 ) 

•4.RS 

151 

«6.R5 

5$ 

20$ 



•l.fPO* 
0 

L$DLY.CPC)* 
0 

-6(PC) 
.-4 

-22(PC) 
.-20 

STUSA( R4 } . TUSASV(R4 ) 



{LOOP ON ERROR? 
jDPO«» UUT 

; LEAVE TST 



; ADJUST STEP COUNTER 

(ADJUST TABLE INDEX 

sSET UP FOR DELAY ROUTINE 

I SET UP FOR COMPARE 

iSET UP INNER 

jGCT SA CONTENTS 

(ARE UE IN STEP 47 

{BRANCH IF NOT 

.JUST LOOK FOR STEP 4 BIT 

jIT'S SET SO LET'S GO 

tSTAY IN LOOP OTHERUISE 

ilF SA IS WHAT UE EXPECT 

i THEN MOVE ALONG 

i ELSE GIVE UUT SOME TIME 

sIF NO TIMEOUT YET 

: THEN GO TAKE ANOTHER LOOK 

i"SA CONTENTS IN ERROR" 



J WRITE NEXT STEP TO UUT 
sIF STEP 5 

! THEN DO PURGE/POLL STUFF 

J IF NOT IN STEP 4 

i THEN GO BACK TO MAIN LOOP 

I ELSE GO CHECK RESULTS 

sGIVE PORT SOME TIME 



;GET SA CONTENTS 



HARDWARE TEST MACRO V0S.03 U«dn«sday 09-Oct-aS 10:06 
SUBTEST 2: EXTENDED ADDRESS TEbT 



3570 
S579 
S5B0 



3561 
3562 

5563 



3564 
3585 
3566 
3567 
3566 
3569 
3590 
3591 
3592 
3593 
3594 
3595 
3596 
3597 
3596 
3599 
3600 
360 1 
3602 
3603 
3604 
3605 



S606 
S607 



3606 
3609 



040546 001412 



040550 
040550 
040552 
040554 
040SS6 
040560 
040560 
040562 
040562 
040566 
040570 
040S70 
040572 

040574 
040602 
040606 

040610 
040614 
040622 

040624 
040632 
040634 
040642 
040644 

040650 
040654 
040660 
040662 

040666 
040672 
040672 
040674 

040676 
040676 
040676 

040700 
040700 
040700 



104455 
000033 
024454 

027002 

104406 

013700 
104451 

104410 

000106 

012774 
005774 
000653 

004737 
032764 
001021 

062737 
103406 
023737 
103402 
000137 

005037 
005337 
001402 
000137 

005037 

104432 

0OOOC4 



104403 



104401 



002332 



000000 000002 
000000 



031456 

000001 000014 



002000 172346 

002120 172346 

040116 

177572 
OOOOOOG 

040112 

177572 



16$: 



20(: 



251: 



BEO 

ERROr 

TRAP 

.WORD 

.WORD 

.WORD 

CKLOOP 

TRAP 

DODU 

MOV 

TRAP 

ESCAPE 

TRAP 

.WORD 

MOV 
TST 
BR 

JSR 
BIT 
BNE 

ADO 
BCS 
CMP 
BLO 
JMP 

CLR 
DEC 
BEQ 
JMP 



ST6EXT: CLR 
EXIT 
TRAP 
.WORD 



L 10026: 



L 10024: 



ENOSUB 
TRAP 
ENDTST 
TRAP 



Pag* 73-2 



16« 

27. .EMSG13.PRIINI 

CIEROF 

27 

EMSG13 
PRIINI 

C»CLP1 

LOGUNT 

LOGUNT.RO 

CtOGDU 

TST 

CIESCAPE 
L10024-. 

♦0.aTUSA(R4) 

aTUlPCR4) 

5» 

PC.CHKCOM 

«0RPFLG.LUNFLG(R4) 

ST6EXT 

«2000.KPAR3 
25 » 

LIHIME.KPAR3 

25» 

3t 

MMUSRO 
ITRCNT 
ST6EXT 
2( 

MMUSRC 
TST 

CIEXIT 
L 10024 



CIESUB 



SEQ 99 



: BRANCH ir OKAY 

:SA NOT 0 IN PURGE/POLL 



! WRITE O'S TO SA 
sANO READ IP 

:G0 WAIT FOR NEXT TRANSITION 

I GO CHECK COMM AREA 
(HAS UUT BEEN DROPPED 
: LEAVE NOW TF SO 

: POINT TO NEXT 32KU0R0S 

; DON'T ALLOW OVERFLOW IF 4 MBYTES 

:IF THERE'S NO MORE MtMORY AVAILABLE 

THEN CHECK FOR MORb ITERATIONS 
: ELSE DO IT AGAIN 

:SHUT DOWN MEMORY MANAGEMENT 
tIF NO MORE ITERATIONS LEFT 
! THEN LEAVE TEST 
s ELSE 00 IT AGAIN 

{MAKE SURE IT'S OFF 



CIETST 



HARDWARE TEST MACRO VOS.OS U«dn**d«y 09-0ct-8S 10:06 Pag* 75 
TEST 7. SHALL RING TEST 



SEQ 100 



3612 
3616 
3617 
3618 
3619 
3620 
3621 
3622 
3623 
3624 
3625 
3629 



.SBTTL TEST 7: SHALL RING TEST 



TEST 7 - SHALL RING TEST 

THIS TEST IS SIHILAR TO TEST 6. HOWEVER. RING DEPTH 
USED IN THIS TEST IS THE HINIHUH. 



3630 


040702 
040702 








T7: : 


BGNTST 


3631 














3632 


040702 


032764 


000001 


000014 




BIT 


3633 


040710 


001402 








BEQ 




040712 
040712 
040714 


104432 

C00526 








EXIT 
TRAP 
.WORO 


3635 


040716 


012737 


025647 


002330 


1$: 


MOV 


3636 


040724 


012737 


000001 


OOOOOOG 




nov 


3637 


040732 


022737 


000001 


002312 




CMP 


3638 


040740 


001403 








BEQ 


3639 


040742 


012737 


AAA A • 

000012 


AAAAAA#* 

OOOOOOG 




nov 


3640 














3641 


040750 


012705 


000000 




21 : 


MOV 


3642 


040754 


012737 


000001 


002336 




MOV 


3643 


040762 


016437 


000004 


002272 




MOV 


3644 


040770 


006237 


002272 






ASR 


3645 


040774 


006237 


002272 






ASR 


3646 


041000 


013737 


002272 


002306 




MOV 


3647 


041006 


052757 


104400 


002272 




BIS 


3648 


041014 


012737 


AAK ^ AA 

005700 


AA'k V A'^ 

002302 




MOV 


5649 














3650 


041022 


012737 


060050 


002274 




twv 


3651 


041030 


012737 


010211 


002304 




MOV 


3652 


041036 


012737 


100000 


002276 




MOV 


3653 


041044 


112737 


000040 


002307 




mvB 


3654 


041052 


0 '^737 


000000 


002300 




MOV 


3655 


04 1060 


Oi2737 


040000 


002310 




MOV 


3656 














3657 


041066 


012737 


000012 


002326 




MOV 


3638 


041074 


004737 


031426 






JSR 


3659 














3660 


041100 


004737 


031330 






JSR 


3661 


041104 


005737 


002340 






TST 


3662 


041110 


001412 








BEQ 


3663 














3664 


041112 
041112 
041114 
041116 
041120 


104455 

000023 
024271 
027002 








ERROF 

TRAP 

.WORD 

.WORD 

.WORD 


3665 


041122 
041122 


104406 








CKLOOP 
TRAP 


:o66 


041124 










DOOU 



*0RPFLG.LUNFL6(R45 
1« 

TST 

C»EXIT 

LV0027-. 

•CTSL.FRUIS 

♦1 . ITRCNT 

«1.PASCNT 

2% 

«10. .ITRCNT 

♦0.R5 

•l.INISTP 

TUVEC(R4).STPTBL 

STPTBL 

STPTBL 

STPTBL. CMPTBL»4 
«104400. STPTBL 
«e.Sl!B.QB!B.OI!B. 

«C0MHAR. STPTBL *2 
•01021 l.CMPTBL*2 
<«. PP. STPTBL ^4 
•40.CMPTBL*5 
«0. STPTBL *6 
«040000.CMPTBL*6 

«10. .CMARLG 
PC.BAKPAT 

PC.STEPl 

STEPST 

5» 

19. .EMSG9.PRIINI 

C»ERDF 

19 

EMS69 
PRIINI 

C»CLPl 
LOGUNT 



;IF UUT NOT DROPPED 
J THEN 00 TEST 
: ELSE GET OUT 



: FAILING FRU IN CASE OF ERROR 
;SET UP FOR ONE TEST ITERATION 
sIF FIRST PASS 
! THEN START TEST 
1 ELSE 00 10 ITERATIONS 

:SET UP RS AS INDEX TO STEP TABLES 
:STEP 1 FOR ERROR PRINTOUT 
sPUT VECTOR IN STEP 1 
lOIVIDE Br TWO 
s DIVIDE BY FOUR 
tPUT VECTOR IN STEP 3 COMPARE 
I REST OF STEP ONE 
OD'B.MP.CMPTBL 

sSTEP 1 COMPARE VALUE 
sSTEP 2 - COHM />REA ADDRESS 
jSTEP 2 COMPARE 

sSTEP 5 - HIGH ADDRESS AND PRGE/POLL 
tREST OF STEP 3 COMPARE 
{STEP 4 

:STEP 4 COMPARE 

iLENGTH OF COMM AREA FOR THIS TEST 
;FZLL COMM AREA WITH ALL I'S DATA 

;G0 00 IT 
J IF STATUS OKAY 
: THEN CONTINUE TEST 

2"SA CONTENTS IN ERROR" 



•LOOP ON ERROR? 
sDROP UUT 



HAROUARE TEST riACRO V0S.03 b«dn*9d«y 09-0ct-8S 10:06 Page 75-1 
TEST 7: SHALL RING TEST 



3667 



3666 
3669 
3670 
3671 
5672 
3675 
3674 
3675 
3676 
3677 
3676 
3679 
3600 
3661 
3602 
3603 
3684 
S6A5 



3607 
3600 

•*0V 



3690 
M41 
3692 
3693 
3694 
3695 
3696 
5697 
5690 



5699 
5700 
3701 
5702 



041124 
041130 
041132 
041132 
041134 

041136 
041142 
041146 
041154 
041162 
041170 
041176 
041202 
041204 
041212 
041214 
041216 
041224 
041226 
041232 
041256 

' 41240 
041240 
041242 
041244 
041246 
041250 
041250 
041252 
041252 
041256 
011260 
041260 
041262 

041264 

041272 
041276 
041500 
041504 
041506 

041510 
041510 
041514 
041516 
041522 
041524 
041550 
041552 
041556 
041540 
041546 

041550 



015700 


002332 






MOV 


LOGUNT.RO 


104451 








TRAP 


CIDOOU 










ESCAPE 


TST 


104410 








TRAP 


CIESCAPE 


000506 








.UORO 


L 10027 - . 


005237 


002336 




5» : 


INC 


INISTP 


062705 


000002 






ADO 


♦2.R5 


012737 


000100 


002346 


6t : 


MOV 


•100. OUTER 


016557 


002302 


002354 




MOV 


CMPTBL(R5),SAEXP 


012757 


037200 


002544 


71 : 


MOV 


•16000. , INNER 


017464 


000002 


000012 




MOV 


8TUSA( R4 ) . TUSASV( R4 ) 


022705 


000006 






CMP 


•6.RS 


001005 








BNE 


01 


033764 


002354 


000012 




BIT 


SAEXP . TUSASVCR4 ) 


001024 








BNE 


lot 


000404 








BR 


9* 


023764 


002334 


000012 


0t ; 


CMP 


SAEXP. TUSASV(R4) 


001417 








BEQ 


101 


C04737 


031302 




9t : 


JSR 


PC .PDELAY 


005737 


002350 






TST 


TOUT 


001751 








BEQ 


7$ 










ERRDF 


20. .EMSG9,PRIINI 


104455 








TRAP 


CIERDF 


000024 








.UORO 


20 


024271 








.UORD 


EMSG9 


027002 








. UORD 


PRIINI 










CKLOOP 




104406 








TRAP 


C»CLP1 










DODU 


LObUNT 


013700 


002352 






MOV 


1 n^t lUT B/\ 
LOGUNT . RO 


104451 








TRAP 


CIDODU 








ESCAPE 


TST 


104410 








TKmP 


CI ESCAPE 


000160 








1 lAAA 

.UURU 


L10027- . 


016574 


002272 


A AAA At 

000002 


« A A 

10( : 


nOV 


5TPTBHR5 J .BTUSAIR4 J 


022705 


000004 






CnP 


AM BC 


001404 








BEQ 


15» 


022705 


000006 






CHr 


•6,R5 


001514 








Due 
BNE 




000440 








BR 


20t 








151: 


DELAY 


1 


012727 


000001 






MOV 


•l.CPO* 










unpn 


Q 


013727 


002116 






MOV 


LIDLY.CPO* 


000000 








.UORO 


0 


005567 


177772 






DEC 


-6(PC) 


001575 








BNE 


.-4 


005567 


177756 






DEC 


-22CPC) 


001367 








BNE 


.-20 


017464 


000002 


000012 




MOV 


aTUSA(R4 ) . TUSASVCR4 ) 


001412 








BEQ 


16* 










ERROF 


21. .EMSG15. PRIINI 



{LEAVE TST 



J ADJUST STEP COUNTER 

: ADJUST TABL<: INDEX 

:SET UP FOR DELAY ROUTINE 

:SET UP FOR COMPARE 

:SET UP INNER 

:GET SA CONTENTS 

I ARE UE IN STEP 4? 

{BRANCH IF NOT 

J JUST LOOK FOR STEP 4 BIT 

jIT'S SET SO LET'S 60 
STAY IN LOOP OTHERUISE 
IF SA IS UHAT UE EXPECT 
THEN MOVE ALONG 
ELSE GIVE UUT SOME TIME 
IF NO TIMEOUT YET 

THEN GO TAKE ANOTHER LOOK 

:''SA CONTENTS IN ERROR" 



URITE NEXT STEP TO UUT 

IF STEP 3 

THEN DO PURGE/POLL STUFF 

IF NOT IN STEP 4 

THEN GO BACK TO MAIN LOOP 
ELSE GO CHECK RESULTS 



sGIVL PORT SOME TIME 



iGET SA CONTENTS 
s BRANCH IF OKAY 

sSA NOT 0 IN PURGE/POLL 



HARDWARE TEST MACRO V05.03 U*dn«*day 09-0ct-e5 10:06 
TEST 7: SHALL RING TEST 



041S50 104455 TRAP 

041352 000025 .WORD 

041354 024454 .WORD 

041356 027002 .WORD 

3703 041360 CKLOOP 
041360 104406 TRkP 

3704 041362 OOOU 
041362 013700 002332 nOV 
041366 104451 TRAP 

3705 041370 ESCAPE 
041370 104410 TRAP 
041372 000050 .UORO 

3706 

3707 041374 012774 000000 000002 161: MOV 

3706 041402 005774 000000 TST 
3709 041406 000653 BR 
3710 

3711 041410 004737 031456 20» . JSR 

3712 041414 032764 000001 000014 BIT 

3713 041422 C01005 BNE 

3714 041424 005337 OOOOOOG DEC 

3715 041430 001402 BEQ 

3716 041432 000137 040750 jr«> 
3717 

3718 041436 T7EXT: EXIT 

041436 104432 TRAP 

041440 000002 .WORD 

3719 

3720 041442 ENOTST 
041442 L10027: 

041442 104401 TRAP 



P*0* 75 2 



C»EROF 
21 

EriSG13 
PRIINI 

CICLPl 

LOGUNT 

L06UNT.ro 

ClOOOU 

TST 

CtESCAPE 

L 10027 -. 

•0.8TUSA(R4) 

8TUIP(R4} 

5$ 

PC.CHKCOM 

«0RPFLG.LUNFLG(R4) 

T7EXT 

ITRCNT 

T7EXT 

2» 

TST 

C«EXIT 
L10027-. 



SEQ 102 



sWRITE O'S TO SA 
:ANO RLAO IP 

:G0 WAIT FOR NEXT TRANSITION 

iGO CHECK CONM AREA 

sHAS UUT BEEN DROPPED 

: LEAVE NOW IF SO 

:IF NO MORE ITERATIONS LEFT 

I THEN LEAVE TEST 

t ELSE DO IT AGAIN 



OETST 



HARDWARE TEST rWCRO VOS.OS U*dn*«day 09-Oct 85 10:06 Page 77 
TEST 0: HAXinun RING BUFFER TEST 



SEQ 103 



3723 
3724 



.S8TTL TEST 8: MAXIMUM RING BUFFER TEST 



3725 


041444 
041444 








T8:: 


BGNTST 




3726 
















3727 


041444 


032764 


000001 


000014 




BIT 


•ORPFLG .LUNFLGCR4 ) 


3728 


041452 


001402 








BEQ 


11 


3729 


041454 
041454 
041456 


104432 

000526 








EXIT 
TRAP 
.WORD 


TST 

CIEXIT 
L10030-. 


3730 


041460 


012737 


025647 


002330 


1<: 


MOV 


♦CTRL.FRUIS 


3731 


041466 


012737 


000001 


OOOOOOG 




MOV 


♦l.ITRCNT 


3732 


041474 


022737 


000001 


002S12 




CMP 


♦l.PASCNT 


3733 


041502 


001403 








BEQ 


21 


3734 


041S04 


012737 


000012 


OOOOOOG 




MOV 


♦10..ITRCNT 


3735 
















3736 


041512 


012705 


000000 




2*: 


MOV 


♦0.R5 


3737 


041516 


012737 


000001 


002336 




MOV 


♦l.INISTP 


3738 


041524 


016437 


000004 


002272 




MOV 


TUVEC(R4).STPTBL 


3739 


041532 


C062S7 


002272 






ASR 


STPTBL 


3740 


041536 


006237 


002272 






ASR 


STPTBL 


3741 


041542 


013737 


002272 


002306 




MOV 


STPTBL. CMPTBL»4 


3742 


041550 


052737 


137400 


002272 




BIS 


♦137400, STPTBL 


3743 


041556 


012737 


00S700 


002302 




MOV 


«B.S1!B.QB!B.DI!B. 


3744 
















3745 


041564 


012737 


060050 


002274 




MOV 


•COMMAR. STPTBL* 2 


3746 


041572 


012737 


010277 


002304 




MOV 


♦010277.CMPTBL»2 


3747 


041600 


012737 


100000 


002276 




MOV 


•6. PP. STPTBL »4 


3748 


041606 


112737 


000040 


002SO7 




MOVB 


•40.CMPTBL»S 


3749 


041614 


012737 


000000 


002300 




MOV 


«0. STPTBL »6 


3750 


041622 


012737 


040000 


002310 




MOV 


•040000. CMPTBL*6 


3751 
















3752 


041630 


012737 


001002 


002326 




MOV 


«514. .CMARLG 


3753 


041636 


004737 


031426 






JSR 


PC.BAKPAT 


3754 
















3755 


041642 


004737 


031330 






JSR 


PC.STEPl 


3756 


041646 


005737 


002340 






TST 


STEPST 


3757 


041652 


001412 








BEQ 


SI 


3758 
















3759 


041654 










ERROF 


22. .EMSG9,PRIINI 
CtEROF 




041654 


104455 








TRAP 




041656 


000026 








.UORO 


22 




041660 


024271 








.WORD 


EMSG9 




041662 


027002 








.UORO 


PRIINI 


3760 


041664 
041664 


104406 








CKLOOP 
TRAP 


CICLPl 


3761 


041666 










OODU 


LOGUNT 




041666 


013700 


002332 






MOV 


LOGUNT.RO 




041672 


104451 








TRW- 


ClOODU 


3762 


041674 










ESCAPE 


TST 

C»ESCAPE 




041674 


104410 








TRAP 




041676 


000306 








.UORO 


L10030- . 


3763 
















3764 


041700 


005237 


002336 




S<: 


INC 


INISTP 


3765 


041704 


062705 


000002 






AOO 


*2.RS 


3766 


041710 


012737 


000100 


002346 


6t: 


MOV 


«100. OUTER 


3767 


041716 


016SS7 


002302 


002SS4 




MOV 


CMPTBL(RS).SAEXP 



J IF UUT NOT DROPPED 
8 THEN 00 TEST 
: ELSE CET OUT 



(FAILING FRU IN CASE OF ERROR 

;SET UP FOR ONE TEST ITERATION 

J IF FIRST PASS 

: THEN START TEST 

t ELSE 00 10 ITERATIONS 

)SET UP RS AS INDEX TO STEP TABLES 
sSTEP 1 FOR ERROR PRINTOUT 
J PUT VECTOR IN STEP I 
(DIVIDE BY TUO 
(DIVIDE BY FOUR 
(PUT VECTOR IN STEP 3 COMPARE 
(REST OF STEP ONE 
ODtB.MP.CMPTBL 

(STEP 1 COMPARE VALUE 
(STEP 2 - COMM AREA ADDRESS 
(STEP 2 COMPARE 

(STEP 3 - HIGH ADDRESS AND PRGE/POLL 
(REST OF STEP 3 COMPARE 
(STEP 4 

(STEP 4 COMPARE 

(LENGTH OF COMM AREA FOR THIS TEST 
(FILL COMM AREA WITH ALL I'S DATA 

(GO 00 IT 

(IF STATUS OKAY 

THEN CONTIWIE TEST 

("SA CONTENTS IN ERROR" 



(LOOP ON ERROR? 
•DROP UUT 

(LEAVE TST 



(ADJUST STEP COUNTER 
(ADJUST TABLE INDEX 
;SET UP FOR DELAY ROUTINE 
(SET UP FOR COMPARE 



HAROUAAE TEST HACRO V05.03 . 

TEST S: riAxinun rinc buffer test 



Ua^tMday 09-0ct-6S 10:06 Pa«» 77-1 



SCO 104 



976« 
3769 
3770 
3771 
3772 
3773 
3774 
3775 
3776 
3777 
3778 
3779 
37SO 
3781 



3762 
3763 

3764 



.^785 
i ' 
578/ 
3788 
3789 
3790 
3791 
3792 
3793 



3794 
3795 
3796 
3797 



3796 
3799 

3800 



0«1724 
041732 
041740 
041744 
041746 
041754 
041756 
041760 
041766 
041770 
041774 
042000 

042002 
042002 
04^004 
042006 
042010 
042012 
042012 
042014 
042014 
042020 
042022 
042022 
042024 

042026 
042034 
042040 
042042 
042046 
042050 

042052 
042052 
042056 
042060 
042064 
042066 
042072 
042074 
042100 
042102 
042110 

042112 
042112 
042114 
042116 
042120 
042122 
042122 
042124 
042124 
042130 
042132 



012737 
017464 
022705 
001005 
033764 
001024 
000404 
023764 
001417 
004737 
005737 
001751 



104455 

000027 
024271 
027002 

104406 

01S700 
104451 

104410 
000160 

016574 
022705 
001404 
022705 
001314 
000440 



012727 
000000 
013727 
000000 
005367 
001375 
005367 
001567 
017464 
001412 



104455 

000030 
024454 

027002 

104406 

013*^00 
104451 



037200 002344 

000002 000012 
000006 

002334 000012 



002334 000012 



74: 



031302 
002350 



8«: 

91: 



002332 



002272 000002 
000004 

000006 



000001 
002116 
177772 
177756 

000002 000012 



10* : 



151: 



002532 



nu» 




rtOV 


8TUSA(R4 ) . TUSASV(R4 ) 


C»*» 


•6.RS 


0*K 




OTT 

oil 








OT* 




n0 

wnf 






1 Aft 


ICO 

Jan 




TCT 


TmiT 


BcW 


r V 






TOAD 




.UORO 


23 


.UORO 


EnSG9 






rvi nnD 






Tin PI 






HOW 




TRAP 


CIOOOU 


ESCAPE 


TST 


TPAP 




unon 








PHP 




UFO 




PHP 


M BS 


One 


«« 
^ V 


AP 

Wf 




DELAY 


1 


nov 


♦I. (PC)* 




Q 




LIOLY fPCl* 




Q 


DEC 






_ .4 




l?2f PC5 




. -20 


MOW 


aTUSA(R4) YIISASV(R4) 




Aw V 


CRROF 


24 . . EHSGl 3 . PRI INI 


TRAP 


CIEROF 


.UORO 


24 


.MORD 


EHSGIS 


.UORO 


PRIINI 


CKLOOP 




TRAP 


CICLPl 


OOOU 


LOGUNT 


HOV 


LOGUNT.RO 


TRAP 


CIOOOU 


ESCAPE 


TST 



SET UP INNER 
GET SA CONTENTS 
ARC UE IN STEP 47 
BRAMCH IF NOT 
JUST LOOK FOR STEP 4 BIT 
IT"-. SET SO LET'S GO 
STAt IN LOOP OTNERUISF 
IF SA IS UHAT UC EXPECT 

THEN nOVE ALONG 

ELSE GIVE UUT SONE TINE 
IF NO TINEOUT TET 

THEN GO TAKE ANOTHER LOOK 

"SA CONTENTS IN ERROR " 



:URirE NEXT STEP TO UUT 
:IF STEP 3 

: THEN 00 PURGE/POLL STUFF 
ilF NOT IN STEP 4 
t THEN GO BACK TO MAIN LOOP 
{ ELSE GO CHECK RESULTS 

(GIVE PORT SOHE TIHE 



:GET SA CONTENTS 
s BRANCH IF OKAY 

iSA NOT 0 IN PURGE/POLL 



HAROUARE 1EST MACRO V05.03 Wednesday 09-Oct 85 10:06 
TEST 8: MAXIKUM RING BUFFER TEST 



77-2 



SEQ 105 



3801 
3802 
3803 
3804 
3805 
3806 
3807 
5808 
S809 
3810 
3811 
S812 
3813 



3814 
3815 



042132 


104410 






TRAP 


C (ESCAPE 




042134 


000050 






.WORD 


L 10030 -. 




042136 


012774 


000000 000002 


16* : 


MOV 


«0.aTUSA(R4) 


sURITE O'S TO SA 


043144 


005774 


000000 




TSf 


8TUIPCR4) 


(AND READ IP 


042150 


000653 






BR 


51 


iGO UAIT FOR NEXT TRANSITION 


042152 


004737 


0314S6 


201: 


JSR 


PC . CHKCOM 


tGO CHECK COtlii AREA 


042156 


032764 


000001 000014 




BIT 


<K)RPFLG , L UNfLG( R4 ) 


{HAS UUT BEEN DROPPED 


042164 


001005 






BNE 


T8EXT 


: LEAVE NOU IF SO 




f 








TTD/*UT 
X 1 KwN 1 


.TP Mn MnOP TTPDATTHMC 1 PPT 


042172 


001402 






BEQ 


T8EXT 


; THEN LEAVE TEST 


042174 


000137 


041512 




JMP 


2* 


1 ELSE DO IT AGAIN 


042200 






T8EXT: 


EXIT 


TST 




042200 


104432 






TRAP 


C»EXIT 




04?202 


000002 






.UORO 


L 10030- . 




042204 








ENOTST 






042204 






L 10030: 








04.'i!204 


104401 






TRAP 


C»ETST 





HAROUARE TEST MACRO VOS.OS Wednesday 09 Oct -65 10:06 Pag* 80 
TEST 9: GET OCST STATUS 

SBTTL TEST 9: GET OUST STATUS 



JO A ~ 










• Ilk 
























1 7 • • 


3822 


042206 


032764 


000001 


000014 




S82S 


042214 


001022 










04P916 


012737 


025647 


00^330 




3825 


042224 


005064 


000014 






3826 


042250 


004737 


031716 






3827 


042234 


032764 


000001 


000014 




3828 


042242 


001007 








3829 


042244 


052764 


000010 


000014 




3830 


0422S2 


012705 


002370 






3831 


042256 


004737 


032350 






3832 


042262 
042262 
042264 


104432 

000002 






T9EXT : 


3835 


042266 
042266 
042266 


104401 






L10031: 



BGNTST 

BIT 
6NE 

MOV 

CLR 

JSR 

BIT 

BNE 

BIS 

MOV 

JSR 

EXIT 

TRAP 

.WORD 

ENOTST 

TRAP 



*0RPFLG.LUNFLG(R4) 
T9EXT 

♦CTRL.FRUIS 

LUNFLG(R4) 

PC.PRTINT 

♦ORPFLG . LUNFLGC R4 ) 
T9EXT 

♦TEST. 9. LUNFLGC R4) 

♦G0UST.R5 

PC.CLSDRV 

TST 

C»EXIT 
L 10031 -. 



C»ETST 



SEQ 106 



ilS THE DRIVE AVAILABLE 
iGET OUT IF NOT AVAILABLE 
i DEFAULT FRU IS CONTROLLER 
5 CLEAR ALL FLAGS 
:G0 DO A PORT INITIALIZE 
ilS THE ORIVC AVAILABLE 
:N0. BRANCH TO EXIT 
;SET TEST 9 FLAG 

5 SET UP TO 00 GET OUST STATUS COMMAND 
sGO ISSUE THE COMMAND 



HAROUME TEST riACRO V0S.03 W»dn«»«*v 
TEST 10: FOHCTIOHAL FAULT DETECTION TE5' 



30 SS 








S056 








5837 


042270 








042270 






5630 


042270 


032764 


OOvOOl 


3039 


042270 


AA« AA O 




3040 


042300 








AA AA 

042SOO 


« AA AKA 




3041 


042902 








0423V2 


f AVA&A 




5042 


O VA^ 

0423O4 








0423V4 


A4 ^TAA 






A^ ^ V t A 

042310 


A1 07A^ 

012 '4o 


OOOOvl 




A4 ^ V 1 A 

042314 


Al AAAA 






A^ A 


1 fiAA 1 7 






v4234CO 






3043 


0#2S2* 








04c324 


Al ^lAM^ 
(lie 






0#c3MJ 


At 0 7AJL 






0423*# 


A 1 AAAA 






AA 








V*c3#0 






3B4* 










0#c3** 


vie 








vie f 


VvWvX 




W*c33* 


Al /^AA 






AAOV<A 
U4c330 








U4c30w 




vvvw^ 




W*c30* 








U*c3** 


Al 37A& 

vie ' 








Al OlAt^ 
(lie ' 


AA/\/\01 
WWvX 




U4c9 »^ 


Al AJ^AA 






U4cd ro 


1 i\AA 1 7 








AiL37AiL 


AAA AAA 


3B40 












1 AAAAX 








AAAA#lA 






AA 1 A 


AASX^A 
UUe33^ 






AA 9 A 1 3 


AAA1 XA 








UeO 1 lo 






AA OA 1 Mi 








AA3A3A 






3047 


042420 


005737 


002354 


3040 


042424 


001407 




3049 


042426 


005037 


002 3S4 


3050 


042432 


112737 


000061 


3051 


042440 


004737 


032150 


3052 


042444 








042444 


104432 






042446 


000002 




3053 


042450 








042450 








0*2450 


104401 





. - p«fl« 01 

(Internal Or i vc T««t 
.SSTTL TEST 10: FUNCTIOMAL FAULT DETECTION TEST (Internal Or v« T,«t 1) 



SEQ 107 



TIO: 



1«: 



10000 t: 



TlOEXTi 



L 10032: 



8GNTST 




BIT 


♦0RPFLG.LUNFLG(R4) 


BNE 


TIOEXT 


MANUAL 




TRAP 


CIMANI 


BNCOnPLETE TIOEXT 




Tl OF^T 
1 X vc A 1 






MOV 




HAU 

rrvl w 


•1 • V 9r J 


HA II 


<;p BA 


TRAP 


riPMTF 


Ann 


•A CP 


PBTMTr 


w 1 xvitoe 








WX t \ Or J 


nnw 

rruv 


CP BO 

Or 0 wv 


TRAP 


CIPNTF 


ADO 


•4.SP 


PRINTF 


•T10MS3 


flOV 




flOV 


•1 -CSP) 


riov 


SP RO 


TRAP 


CtPNTF 


ADD 




PRINTF 


•Tions4 


nov 


•T10MS4 -(SP) 


nov 


41 - ( SP ) 


flOV 


SP.RO 


TRAP 


CIPHTF 


ADO 


•4.SP 


GMANIL 


WJESTN.ANSUER.l.YES 


TRAP 


CIGHAN 


BR 


lOOOOt 


.WORD 


ANSUER 


.UORD 


T»COD£ 


.UOftO 


CUESTN 


.WORD 


1 


TST 


ANSUER 


BCQ 


TIOEXT 


CLR 


ANSUER 


nova 


«6i.TSTNAn 


JSR 


PC.ORVTST 


EXIT 


TST 


TRAP 


C»EXIT 


.WORD 


L 10032-. 


ENDTST 




TRAP 


CIETST 



ilS THE DRIVE AVAILABLE 

iNG. BRANCH TO EXIT 

:nANUAL INTERVENTION ALLOWED ? 

{NO. BRANCH TO EXIT 

{PRINT TEST 10 MESSAGE 



J PRINT TEST 10 nESSAGC 



: PRINT TEST 10 MESSAGE 



jPRINT TEST 10 MESSAGE 



:GET OPERATOR INPUT 



iOID OPERATOR ANSUER YES ? 

:N0. BRANCH TO EXIT 

s CLEAR OPERATOR ANSUER 

sLOAO DRIVE TEST NAME (ASCII 1) 

iGO RUN THE INTERNAL DRIVE TEST 



HARDUADE TEST riACRO VOS.03 U«dnc*4»y 09 Oct 85 10:06 Page 82 
rEST 11: TENSION FAULT ISOLATION TEST flntarnal Or.v« T**t ?) 



sec 108 



S8S5 
S8M 

5857 

5858 
3859 
3860 

3861 

3862 



3863 



3864 



3865 
3866 
3867 
5868 
3869 
3870 



3871 



042452 
04£452 
042452 
042460 
042462 
042462 
042464 
042464 
042466 
042466 
042472 
042476 
042500 
042502 
042506 
042506 
042512 
042516 
042520 
042522 
042526 
042526 
042530 
042532 
042534 
042536 
042540 
042542 
042542 
042546 
042550 
042554 
042562 
042566 
042566 
042570 
042572 
042572 
042572 









CATTI 


TEST 11 


■ TENSION rAULT ISOt-ATION 


leal vinivrnai llrivw ■••I cJ 










BGNTST 












Ill:: 








092764 


UlA/OUl 


OUUOIA 


BIT 


#ORPFLG . LUNFLG( R4 ) 


.TC TuC I^BTUC AuATl AAl C 










BNE 


TllEXT 


. klA DDAkl^U TA CVTT 










MANUAL 




.MAMlAi TMTPOWPIiTTnM U 1 Hum > 










TRAP 


CitlANI 












BNCOtlPLETE TllEXT 


Ijn BOUIPH Tn CVTT 










dCC 


T t « IT VT 

TlltKT 










1 * : 


DO ThiTC 

rfiXH 1 r 


AT 1 1 MCI 

» 1 1 ins 1 


.DOTUT TCCT 1 1 MCCCA#^ 


A1 9*7 AiL. 


A3A 3 51 






HUV 


AT 1 1 MC 1 ^ CD ^ 






AAAAA1 






nuv 


A1 / CO ^ 




t\% AAA/) 








MAW 

nuv 


CD DA 




1 AAA 1 7 








TOAD 


C 9rn 1 r 




VOc ' vO 


AAA AAA 






AAA 


AA CD 












DOTUTF 




• PQTMT BFDIITQrHPMT MFCCAftF 




A9#^^XI« 
VcC 3 JO 






MAU 


ftMurf f CD 






AAAAA1 






mau 

nuv 


A1 fCD^ 

•I . -V bK ^ 












MAU 


CD DA 




















AAAAAA 






ADD 


M SP 












GMANIL 


QUESTN.ANSUER.l.YES 


• fIFT riPPDATflB TMPllT 

t UC 1 W~Cnf4 f wn Lrtr\Ji 










TRAP 


CtGMAN 












BR 


10000$ 












.UORD 


ANSUER 




AAA1 XA 








.UORD 


TICODE 




026716 








.WORD 


QUESTN 












.UORD 


1 










1 AAA A ft ■ 








005737 


002354 






TST 


ANSUER 


:DID OPERATOR ANSUER YES 


001407 








BEQ 


TllEXT 


:N0, BRANCH TO EXIT 


005037 


002354 






CLR 


ANSUER 


s CLEAR OPERATOR ANSUER 


112757 


00006^ 


002424 




novB 


•62.TSTNAf1 


sLOAO PROGRAM NAME (ASCII 2) 


004737 


032150 






JSR 


PC.ORVTST 


sGO RUN THE INTERNAL DRIVE TEST 








TllEXT: 


EXIT 


TST 




104432 








TRAP 


C»EXIT 




000002 








.UORD 


L 10033 -. 










ENDTST 












L10033: 








104401 








TRAP 


C»ETST 





HARDWARE TEST MACRO V05.03 Wednesday 09 Oct-S5 10:06 Page 03 
TEST 12: VELCCITY FAULT ISOLATION TEST ClnteroBl Drive Teat 3) 



3673 






3874 






3875 


042574 
042574 




3876 


042574 


032764 


3877 


042o02 




V M f A 

3878 


042604 






042604 


1044D0 


5679 


042DUe 






042606 


lUd04U 


3660 


U4«OiO 






U4eolO 






W4i014 








OIUOVV 






104*1 / 




U4cee4 


ODc r VO 


3B61 


v44f03U 






W4C03U 


Ulc f #0 




W4e034 


Olc r 




U^«04U 


V XUOVV 




04cD4c 








OOs rUO 




v4e03U 






V4eO 




















AMI 




v4cOOv 






042662 


000001 




v^c004 




3883 


042664 


005737 


5864 


042670 


001407 


3665 


042672 


005037 


3666 


042676 


112737 


3667 


042704 


004737 


3666 


042710 






042710 


104432 




042712 


000002 


3869 


042714 
042714 






042714 


104401 



000001 000014 



.SBTTL TEST 12: VELOCITY FAULT ISOLj 



T12:; 



026324 
000001 



000004 

026536 
000001 



000004 



II; 



002354 
002354 

000063 002424 
032150 



lOOOOt: 



L 10034: 



BGNTST 




BIT 


•0RPFLG.LUNFLG<R4) 


BNE 


T12EXT 


MANUAL 




TRAP 


CIMANI 


BNCOHPLETE T12EXT 


BCC 


T12EXT 


PRINTF 


♦T12MS1 






nu V 


ai -fCPS 


Mnu 
nuv 


CD DA 


TRAP 




Ann 


»A CP 

a Or 


PBTMTF 




Mnu 
nu V 


aMMCd - f CP ^ 




•1 .fCP^ 


MOV 


SP.RO 


TRAP 


C»PNTF 


ADD 


#4,SP 


GMANIL 


QUESTN. ANSWER. 1. YES 


TRAP 


CtGMAN 


BR 


lOOOOt 


.WORD 


ANSWER 


.WORD 


TICOOE 


.WORD 


QUESTN 


.WORD 


1 


TST 


ANSWER 


BEQ 


T12EXT 


CLR 


ANSWER 


MOVB 


«63.TSTNAM 


JSR 


PC.DRVTST 


EXIT 


TST 


TRAP 


CIEXIT 


.WORD 


L100S4-. 


ENDTST 




TRAP 


CIETST 



TEST (Internal Drive Teat 3) 



lis THE DRIVE AVAILABLE 

(NO. BRANCH TO EXIT 

; MANUAL INTERVENTION ALLOWED 7 

iNG, BRANCH TO EXIT 

: PRINT TEST 12 MESSAGE 



{PRINT TEST REQUIREMENT MESSAGE 



tGET OPERATOR INPUT 



I DID OPERATOR ANSWER YES ? 
(NO. BRANCH TO EXIT 
: CLEAR OPERATOR ANSWER 
:LOAD PROGRAM NAME (ASCII 3) 
:G0 RUN THE INTERNAL DRIVE TEST 



HARDWARE TEST flACRO V0S.03 Wednesday 09-0ct-8S 10:06 Pag* S4 
TEST IS: SELECT A DRIVE RESIDENT TEST (internal Driwa T««t» 1- 



SEQ 



3091 








SS92 








5893 


042716 








042716 






5894 


042716 


032764 


000001 


3895 


042724 


001065 




5896 


042726 








042726 


104450 




5897 


042730 








042730 


103063 




3698 


042732 








042732 


012746 


026430 




042736 


012746 


AAAAA 4 

000001 




042742 


010600 






042744 


104417 






042746 


062706 


A A AAAd 

000004 


3899 


042752 








042752 


A4 O^d d 

012746 


A^dC Vd 

026536 




042756 


A4 ^^d d. 

012746 


AAAAA 4 

000001 




042762 


A 4 Ad AA 

CI 0600 






042764 


4 Ad d 4 ^ 

104417 






042766 


Ad 'V^Ad 

062706 


Ouvooa 


3900 


042772 








AA ^^^^ 

042772 


104443 






042774 


AAAd Ad. 

000406 






042776 


022 f 34 






A4 V AAA 

043000 


AAA 4 d^ 

000142 






Ad V AA^ 

0430O2 


AOddd d. 

026646 






043004 


AAAAAA 

oooooo 






A A V AAf 

043006 


AAAAA 9 

000001 






043010 


AAAAA 'I 

000002 






Ad V A4 ^ 

043012 






3901 


Ad V A4 ^ 

043012 


A4 ^^A^ 

012702 


002424 


VMM t 

3902 


Ad VA4 ^ 

043016 


A4 '^^AV 

012703 


OcZ rsa 


3903 


Ad VA^^ 

043022 


4 9 ^ V 

112322 




3904 


Ad VA'^d 

043024 


4 AK^ 4 V 

105713 




3905 


Ad V A^^ 

043026 


AA4 dA4 

001401 




3906 


Ad VAV A 

043030 


4 4 4 V 9 O 

111312 




3907 


Ad V AV *S 

043032 








043032 


4 Ad d d V 

104443 






Ad V AVd 

043034 


AAAd Ad 

000404 






Ad V AVd 

043036 


AA A ViCd 

002354 






Ad VAd A 

043040 


AAA 4 VA 

0O0130 






Ad V Ad A 

043042 


026716 






Ad VAd d 

043044 


AAAAA 4 

000001 






Ad VAdd. 

043046 










W9 r d f 


0031^4 


3909 


043052 


001412 




3910 


043054 


0050S7 


002S54 


3911 


043060 


004737 


0321S0 


3912 


04S064 


012702 


002424 


3913 


043070 


112722 


000040 


3914 


043074 


112712 


000040 


3915 


043100 








043100 


104432 






043102 


000002 




3916 


043104 







.SBTTL 
T13:: 



TEST 15: SELECT A DRIVE RESIDENT TEST (Internal Drive Teatc 1 99) 



It; 



BGNTST 

BIT 
BNE 

MANUAL 
TRAP CtHANI 
BNCOMPLETE 
BCC T13EXT 
PRINTF #T13MS1 



•0RPFLG.LUNFLG(R4) 
T13EXT 



T13EXT 



lOOOOt : 



10*: 



10001 ti 



T13EXT! 



MOV tfTlSMSL-CSP) 

MOV #1.-(SP) 

MOV SP.RO 

TRAP C»PNTF 

ADD «4 . SP 

PRINTF «MnSG 

MOV •MMSG.-(SP) 

MOV #1.-(SP) 

MOV SP.RO 

TRAP C»PNTF 

ADD M.SP 

GMANID SELTST.MANTBL.A..1.2.N0 

TRAP C»GMAN 

BR 10000* 

.WORD MANTBL 

.WORD TtCODE 

.WORD SELTST 

.WORD 

.UORD T»LOLIM 

.WORD TiHiLIM 

MOV «TSTNAM.R2 

MOV •nANTBL.R3 

MOVB (R3)*.(R2)* 

TSTB CR3) 

BEQ lot 

MOVB (R3).(R2) 

GMANIL QUESTN. ANSWER. 1. YES 

TRAP CtGMAN 

BR 10001 t 

. WORD ANSWER 

.WORD TtCODE 

.WORD QUESTN 

.WORD 1 

TST ANSWER 

BEQ T13EXT 

CLR ANSWER 

JSR PC.DRVTST 

MOV •TSTNAM.R2 

MOVB «40,(R2)* 

MOVB *40.(R2) 

EXI^ TST 

TRAP CtEXIT 

.WORD L100SS-. 
ENOTST 



lis THE DRIVE AVAILABLE 

sNO. BRANCH TO EXIT 

I MANUAL INTERVENTION ALLOWED 7 

iNO. BRANCH TO EXIT 

1 PRINT TEST 13 MESSAGE 



1 PRINT TEST REQUIREMENT MESSAGE 



iASK OPERATOR FOR TEST NUMBER 



:GET ADDRESS OF DRIVE TEST NAME 

iGET ADDRESS OF OPERATOR INPUT DATA 

.-LOAD 1ST DIGIT OF TEST NAME 

: CHECK FOR A 2ND DIGIT 

: BRANCH IF NONE 

sLOAD 2ND DIGIT OF TEST NAME 

lASK OPERATOR IF READY 



I DID OPERATOR ANSWER YES ? 

;N0. BRANCH TO EXIT 

: CLEAR OPERATOR ANSWER 

:G0 RUN THE INTERNAL DRIVE TEST 

jCCf ADDRESS OF DRIVE TEST NAME 

.RETURN DRIVE TEST NAME TO ASCII SPACES 



HARDWARE TEST MACRO V0S.03 
TEST 13: SELECT A DRIVE RESIDENT TEST 



U«dn«sday 09-0ct-8S 10:06 

Cintc-nal Drive Tests 1- 



Pegc B4-1 



SEQ 111 



3917 
3918 
3919 
3930 
3931 
3959 
3960 
3961 
3962 
3963 
i964 
3965 
3966 
3967 
3960 
3969 
3970 
3971 



3972 
3978 
3979 



3900 



3901 



3902 
3903 

3904 
3905 
3906 
3907 
3900 
3909 
3990 
3991 



043104 
043104 
043106 



043106 



104401 



L1003S: 



TRAP 
ENOnOD 



CIETST 



.TITLE PARAMETER CODING 

.SBTTL HAROUARE PARAMETER CODING SECTION 
BGNMOO 



THe HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P -TABLES. THE 
5 MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
s MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
i WITH THE OPERATOR. 



043106 










BGNHRD 




043106 


000044 








.WORD L10036-LIHARO/2 


043110 








L$HAR0: 






043110 










GPRMA 


TUIPAO .0.0. 160002 . 177564 . YES 


043110 


000031 








.WORD 


TICODE 


043112 


043146 








.WORD 


TUIPAD 


043114 


160002 








.UORO 


TtLOLiM 


043116 


177564 








.WORD 


TIHILIM 


043120 










GPRMD 


TUVECT. 2. 0.777. 60. 776. YES 


043120 


001032 








.WORD 


TICODE 


043122 


043163 








.WORD 


TUVECT 


043124 


000777 








.WORD 


777 


043126 


000060 








.WORD 


T»LOLIM 


043130 


000776 








.WORD 


TIHILIM 


043132 










GPRMD 


TUUNT, 4, 0,777. 0.251. YES 


043132 


002032 








.WORD 


T»CODE 


043134 


043175 








.WORD 


TUUNT 


043136 


000777 








.WORD 


777 


043140 


000000 








.WORD 


TILOLIM 


043142 


000251 








.WORD 


T$HILIM 


043144 










EXIT HRO 


043144 


026004 








.WORD 


TtCODE 


043146 


124 


125 


111 


TUIPAO ! 


.ASCIZ 


7TUIP ADDRESS? 


043163 


124 


125 


040 


TUVECT : 


.ASCIZ 


?TU VECTOR? 


043175 


124 


057 


lis 


TUUNT: 


.ASCIZ 


7T/MSCP UNIT NUMBER? 



3992 
3999 



043220 
043220 



LJ'^'»36i 



.EVEN 



ENO»«D 
.EVEN 



PARAMETER COOING riACRO V05.03 

SOFTWARE PARAMETER COOING SECTION 



4002 
4003 
4004 
4005 
4006 
4007 
4008 
4009 
4010 
4011 
4012 

4013 043220 
043220 
043222 

4014 

4021 
4022 
4023 

4024 043222 



000000 



4025 
4026 
4036 
4037 
4036 
4039 
4040 
4041 
4042 
4043 
4044 
4045 
4046 
4047 
4046 
4049 
4050 
4051 
4052 
4053 
4054 
4055 
4056 
4057 
4056 
4059 
4060 
4064 
4065 



043222 



060000 



060000 
060000 
060000 
060050 
060050 
062054 
062054 

062124 



062124 
062126 
062130 

4066 0621S0 

4067 



000000 
000000 



000001 



Uedncsday 09-0ct-85 10:06 P«9* 86 



.SBTTL SOFTWARE PARAMETER COOING SECTION 



t THE SOFTWARE PARAMETER COOING SECTION CONTAINS MACROS 

; THAT ARE USED BY THE SUPERVISOR TO BUILO P- TABLES. THE 

; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 

: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 

s MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 

i WITH THE OPERATOR. 



SEQ 112 



L»SOFT: 



L 10037: 



BGNSFT 

.WORD L 10037 L»S0FT/2 



.EVEN 



ENDSFT 
.EVEN 



i 



I *************************************************************** 

COMMimiCATIONS AREA 

THIS IS THE COMMUNICATIONS AREA THAT IS USED 
THROUGHOUT THE PROGRAM IN TESTING THE PERMUTATIONS 
OF THE UQ-PORT INIT SEQUENCE. IT IS ESSENTIAL THAT 
THIS AREA RESIDE IN AN 8K8YTE AREA OF MEMORY FREE 
OF DIAGNOSTIC CODE SO THAT IT MAY BE SUCCESSFULLY 
RELOCATED THROUGHOUT UPPER MEMORY VIA MEMORY MAN- 
AGEMENT. 

• A*********************** *************************************** 



ROBUF: : 
COMMBF: 

COMHAR : 

LASTBF: 



. -60000 

.BLKW 20. 
.BLKW 514. 
.BLKW 20. 



START OF THE THIRD SKBYTE BLOCK 

OF VIRTUAL MEMORY SPACE. ACCESIBLE 

VIA PAR/PDR 2. 



BUFFER SPACE PRECEDING COMM AREA 

MAXIMUM COMM AREA LENGTH 

BUFFER SPACE SUCCEEDING COMM AREA 



L$LAST: 
.END 



LASTAO 
.EVEN 
.WORD 
.WORD 

'endmoo 



0 
0 



I 

I 
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Symbol 


table 




























ABORT 


002466 




CKCMEX 


051614 




CIINLP- 


000020 




EnsG5 


024140 


G 


GtRADA- 


000140 




AOR 


• 000020 


G 


CLSORV 


032350 


G 


CtMANI- 


000050 




EnSG6 


024161 


G 


GIRA06- 


000000 




ANSWER 


002354 


G 


CHARLG 


002326 


G 


C«MAP - 


000102 




EHSG7 


024212 


G 


GIRAOD* 


000040 




ASSEMB' 


• 000010 




CMDCNT 


002746 


G 


CIMEM - 


000031 




EMSGB 


024233 


G 


G$RA{M.- 


000120 




SAKPAT 


031426 


6 


CMDREF 


002744 


G 


c»«nu - 


000103 




EMSG9 


024271 


G 


CIRAOO- 


000020 




rr^o ■ 


000001 


G 


CHORNG 


002726 


G 


C»MSG - 


000023 




ENCODE 


023754 


G 


GtXFER- 


000004 




81 TOO • 


000001 


G 


CWSAV 


022750 


G 


CtOPNR- 


000034 




END 


033706 




G»YES • 


000010 




BITOl • 


000002 


G 


CrtlERR 


002322 


G 


OOPNW- 


000104 




ENDCLE 


033754 




HELP - 


000000 




BIT02 ■ 


000004 


G 


CMPTBL 


002302 


G 


CtPNTB- 


000014 




ERR 


100000 


G 


HIAODR- 


000002 


G 


BXT03 • 


000010 


G 


CHTBL-; 


002324 


G 


C«PNTF- 


000017 




EVL 


000004 


G 


HOE 


100000 


G 


BZT04 - 


000020 


G 


CNTER - 


000000 


C 


CIPNTS- 


000016 




EXELOC 


002410 




HSTIHO- 


000000 


G 


BIT05 « 


000040 


G 


CNTFLG 


002740 


G 


CIPNTX- 


OOOOIS 




EXT 


036116 




XBE - 


010000 


G 


8XT06 • 


000100 


G 


CNTHI 


002736 


G 


CIPUTB* 


000072 




EXTINT 


0S0672 




IDU 


000040 


G 


BITOT - 


000200 


G 


CNTRLC- 


000003 


G 


CIPUTU" 


000073 




EXTVEC 


031300 




lER 


020000 


G 


BIT08 > 


000400 


G 


COfmAR 


060050 


G 


CtQIO - 


000377 




EtENO - 


002100 




ILLINT 


030674 


G 


BIT09 - 


001000 


G 


COMMBF 


060000 


G 


CtRDBU- 


000007 




EILOAD- 


000035 




ILOOP 


031746 




BITl . 


000002 


G 


CONIO - 


177777 


G 


OREFG- 


000047 




FAULTC 


024066 


G 


Ilfl 


000200 


G 


BITIO - 


002000 


G 


CPFLAG 


002362 


G 


CIREL - 


000077 




FLAG - 


040000 


G 


insG 


033712 




BITll ■ 


004000 


G 


CPFLG - 


****** 


GX 


C<RESE- 


000033 




FLAGS 


024047 


G 


INISTP 


002336 


G 


BZ1I2 - 


010000 


G 


CRD 


177776 


G 


CtREVI- 


000004 




FRUERR 


030624 


G 


INNER 


002344 


G 


BIT13 ■ 


020000 


G 


CREFNO 


023436 


G 


C»RFLA" 


000021 




FRUIS 


002330 


G 


INTFLG- 


000002 


G 


BIT14 - 


040000 


G 


CTRL 


025647 


G 


CIRPT - 


000025 




F$AU - 


000015 




INTrtlU 


031616 


G 


B1T15 ■ 


100000 


G 


CIAU - 


000052 




CISEFG- 


000046 




FIAUTO" 


000020 




INTMSG 


030540 


G 


BIT2 - 


000004 


G 


CtAUTO- 


000061 




CtSPRI- 


000041 




FIBGN - 


000040 




INTRCV 


030664 


G 


BITS - 


000010 


G 


CtBRK ■ 


000022 




CISVEC- 


000037 




FICLEA- 


000007 




INTTBL 


032140 




BIT4 • 


000020 


G 


CtBSEG- 


000004 




CITOME" 


000076 




F$OU ■ 


000016 




INVnSG 


030604 


G 


BITS - 


000040 


G 


CIBSUB- 


000002 




DFPTBL 


002224 


G 


FIEND - 


000041 




ISR 


000100 


G 


BIT6 • 


000100 


G 


CICLCK- 


000062 




OIAGMC- 


000000 




FtHARO- 


000004 




ITRCNT- 


****** 


GX 


BIT? - 


000200 


G 


CICLEA- 


000012 




OISCAC* 


000014 


G 


F»HU - 


000013 




IXE 


004000 


G 


BITB - 


000400 


G 


CICLOS- 


000035 




DONEFL- 


000020 


G 


FIINIT- 


000006 




I*AU - 


000041 




BIT9 • 


001000 


G 


CICLPl- 


000006 




DRPFLG- 


000001 


G 


F$JMP " 


000050 




IIAUTO- 


000041 




BOf 


000400 


G 


CICPBF- 


000074 




DRVE 


025716 


G 


FIMOD - 


000000 




IICLN - 


000041 




BRFLAG- 


000004 


G 


CICPME- 


000075 




DRVER - 


000011 


G 


FtHSG • 


000011 




IIOU - 


000041 




BUFOES 


0236S3 


G 


C»CVEC" 


000036 




DRVTST 


032150 




FIPROT- 


000021 




IIHRO - 


000041 




BYTCNT 


023627 


G 


CIDCLN- 


000044 




DSCENO 


002736 


G 


F*PUR - 


000017 




I UNIT - 


000041 




B.OI - 


000400 


G 


CIOODU- 


000051 




DSCRNG 


002712 


G 


F$RPT - 


000012 




IIMOO " 


000041 




B.ER - 


100000 


G 


CIDRPT- 


000024 




EF . CON* 


000036 


G 


FtSEG - 


000003 




ItliSG ■ 


000041 




8. GO - 


000001 


G 


C»OU • 


000053 




EF.NEU* 


000035 


G 


F$SOFT" 


000005 




ItPROT- 


000040 




B.IE - 


000200 


G 


CIEOIT- 


000000 




EF.PUR- 


000034 


G 


FISRV ■ 


000010 




IIPTA8- 


000041 




B.LF - 


000002 


G 


C»EROF- 


000055 




EF.RES" 


000037 


G 


F$SUB ■ 


000002 




KPUR - 


000041 




B.MP - 


000100 


G 


CIERHR- 


000056 




EF.STA" 


000040 


G 


F»SU - 


000014 




IIRPT ■ 


000041 




B.NV - 


002000 


G 


CIERRO- 


000060 




ELPERR 


027306 


G 


FITEST- 


000001 




IISEG - 


000041 




B.OO - 


000200 


G 


C«ERSF- 


000054 




EMSGIO 


024316 


G 


GDSERR 


030256 


G 


IISETU* 


000041 




B.PI - 


000001 


G 


CIERSO- 


000057 




EHSGll 


024344 


G 


GDUST 


002370 




IISFT - 


000041 




B.PP • 


100000 


G 


CIESCA- 


000010 




EMSG12 


024405 


G 


GO 


000001 


G 


IISRV " 


000041 




B.Q8 - 


001000 


G 


CIESEG- 


000005 




EHSG13 


024454 


G 


GICNTO" 


000200 




IISUB ■ 


000041 




B.Sl - 


004000 


G 


CIESUB- 


000003 




EnSG14 


024503 


G 


G»OELM- 


000372 




I»TST • 


000041 




B.S2 - 


010000 


G 


CIETST- 


000001 




EHSGIS 


024532 


G 


GIOISP- 


000003 




JUMP - 


000167 




B.S3 ■ 


020000 


G 


ClEXIT- 


000032 




EHSG16 


024567 


G 


GIEXCP- 


000400 




KPARO - 


172340 


G 


B.S4 - 


040000 


G 


CIFREQ- 


000101 




tnSGl7 


024637 


G 


GlHILI* 


000002 




KPARl ■ 


172342 


G 


B.UR - 


040000 


G 


C»FRME- 


000100 




EHSGIB 


024701 


G 


GILOLI- 


000001 




KPAR2 - 


172344 


G 


CCR • 


177746 


G 


CIGETB" 


000026 




EnSG19 


024743 


G 


G$NO - 


000000 




KPAR3 - 


172346 


G 


CORECV 


032356 


G 


CIGETW- 


000027 




EnSG20 


025013 


G 


GIOFFS- 


000400 




KPAR4 - 


172350 


G 


CMKCAC 


030704 


G 


CtGIIAN- 


000043 




EHSG21 


025052 


G 


GIOFSI- 


000376 




KPAR5 - 


172352 


G 


CHKCOn 


031456 


G 


CIGPHR- 


000042 




EnSG22 


025104 


G 


GIPRHA- 


000001 




KPAR6 - 


172354 


G 


CHKMSG 


033326 




C$GPRI- 


000040 




EHSG23 


025135 


G 


GtPRNO- 


000002 




KPAR7 - 


172356 


G 


CHKRSP 


033042 




CIZNIT- 


000011 




EHSG24 


025215 


G 


GIPRNL- 


000000 




KPORO > 


172300 


G 
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Syntool 


tabU 




























KPORl • 


172502 


6 


LIICP 


002104 


G 


NMUSRO- 


177572 


G 


PRI06 • 


000300 


G 


T5TNW1 


AA*%A 

002424 




KP0R2 > 


172304 


G 


LIINIT 


033464 


G 


fWUSRl- 


177574 


G 


PRI07 ■ 


000340 


G 


Ti ITB _ 

TUIP • 


000000 


G 


KP0R3 - 


172306 


G 


LILADP 


002026 


G 


nMUSR2- 


177576 


G 


PROGRH 


002360 


G 


TL'IPAD 


AA V 4 A£ 

043146 




KP0R4 - 


172310 


G 


LILAST 


062130 


G 


musRS- 


172516 


G 


PROGRL 


002356 


G 


TUIPSV" 


OOOOlO 


G 


KPDR5 - 


172312 


G 


LILOAO 


002100 G 


nn220N- 


000020 


G 


PRTDhV 


032456 


G 


TU5A ■ 


AAAAAA 
000002 


G 


KP0R6 - 


172S14 


G 


LILUN 


002074 


G 


rtOOIFY 


023520 


G 


PR TINT 


031716 


G 


Ti i^ Ad< ^ 

TUSASV" 


AAAA 4 ^ 

000012 


G 


KP0R7 • 


172316 


G 


LinREV 


002050 


G 


MSCPUN- 


000006 


G 


r.BCNT* 


OOOUI4 


G 


ti ■ lUT 


AA X \ 7C 

043175 




KTEXT 


031146 




LINAflE 


002000 


G 


nscpVR- 


000000 


G 


P .BUrP* 


000020 




Ti t\lC^ B 


AAAAAA 


G 


XTFLAG 


002314 


G 


LIPRIO 


002042 


G 


nSGLEN- 


177774 


G 


P . CRF ■ 


000000 




TUVECT 


AA V « A V 

043163 




KTTEST 


030776 


G 


LIPROT 


022760 G 


NEXT 


033604 




P.ENDC" 


A/\AA • A 

OOOOlO 


6 


TXrtR * 


AAAAAC 

ooooos 


G 


LASTBF 


062054 


G 


LIPRT 


00211Z 


G 


NOKT 


031142 




P.FLGS" 


000017 


G 


TIARGC" 


AAAAA4 
000001 




LESI 


025632 


G 


LIREPP 






NUPASS 


033570 




n Tuft 4 . 
P . INUl- 


OvvOeO 


G 


T A^AAC a 


AAAAAA 

O2o0O4 




LINEl 


022774 


G 


LIREV 




u 


ONEFIL- 


000001 




r . IND2> 


000022 




1 fcRRN" 


AAAA VA 
0000 30 




LINE2 


023030 


G 


LIRPT • 


****** 


bX 


OPCODE 


023500 


G 


r\ Mnf\ — 

r .noo " 


000012 


G 


1 •tXCr" 


AAAAAA 
OOOOOO 




LINES 


023110 


G 


LISOFT 




fi, 
u 


OP.ABT- 


000006 


G 


P.OPCO" 


OOOOlO 




T IF LAG' 


AAAAA 1 

0OOO41 




LINE4 


023140 


G 


LISPC 




r- 
u 


OP.ELP- 


000OO3 


G 


r.5T5 " 


000012 


G 


1 f bnHN* 


AAAAAA 

OOOOOO 




LINES 


023203 




LISPCP 




r- 


OP.ENO- 


000200 


G 


r . T inu " 


000024 


G 


T AUTI T a 


AAA^CI 

000231 




LINE6 


023260 




LISPTP 




/■ 
W 


OP.GOS* 


000001 


G 


BUcSTN 


02671O 


G 


T *l ACT a 


AAAAA1 
000001 




LINE? 


023323 


G 


LISTA 




u 


OP.REC" 


000005 


G 


RBUr " 


1 7*7C^^ 

1 r '362 


u 


T Ai T a 

1 ILULX* 


AAAAAA 

OOOOOO 




LOE 


040000 


G 


LISU 


AA99TA 


/■ 
u 


OUTER 


002346 


G 


RCSK " 


1775o0 


G 


T ft 1 C VM. 
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A« AAAA 
010000 




LOGUNT 


002332 


G 


LITEST 




1* 


OUN 


100000 


G 


Df*un*T 


00c*90 




1 fL INO" 


AAAA1 C 
OOOOX3 




LOOP 


031736 
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w 


OIAPTS- 


000000 




NCVcRR 


A97?9£ 

0277ZO 


u 


T »(it9T " 


1 f » f 7 f 




LOT 


000010 


G 


LIUNIT 




u 


OIAU - 


000000 




NDBUr 


OoOOOO 


G 


1 IN90 ■ 


AAAAAA 

OOOOOO 




LSCT 


025670 




L 10000 






OIBGNR- 


000001 




RESPBr 


AA9CAO 

0O2302 


G 


1 *N9X ■ 


AAAAAC 

000003 




LUNBLK 


002234 


G 


I 10001 






OIBGNS- 


000000 




RfUjblr" 


ooooo# 


G 


TAUCO ■ 
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AAAAAA 
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000014 


G 
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OlOU - 


000001 
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AA^CAA 

002300 
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AAAAAA 
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L»ACP 


002110 


G 
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000001 
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u 
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LIAPT 
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G 
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u 
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L»AU 


034010 


G 


L10006 
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022 '32 


G 
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AAAAAA 
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LtAUT 


002070 


G 
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000000 
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L» AUTO- 


****** 


GX 
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PAROFF 


002320 


G 
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u 
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Al AAAA 
0X0040 




LI CCP 


002106 


G 


L 10011 
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002312 


G 


sAtXr 


002334 


u 




AAAAAA 
OOOOOO 




LICLEA 


033744 


G 


L10012 






PCKSIZ 


002742 


G 


CCI TCT 
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020046 
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u 


T A TPCT a 


AAAA1 C 

000013 




LtCO 


002032 


G 


L 10013 






POELAY 


031302 


G 


CCDTttI 


AA09V^ 

OOeeM 


G 


TA TCTMa 
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\ 77777 




LIOEPO 


002011 


G 


L 10014 






POLYEX 


031326 




CTADT 


099390 




T * TCTCa 
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AAAAA1 
000001 




LIOESC 


002156 
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L10015 






PORECV 


032670 
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029 r33 


G 
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At AA i 

010012 




L tOESP 


002076 


G 


L10016 


034742 
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CTCDCT 
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002060 
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010011 




LIOISP 
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G 
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PRIERR 
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002064 
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TEMP 
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034230 
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OOOOlO 
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OOOOlO 


G 


TIOEXT 


042444 




LIMINE 


002120 


G 


L10037 


043222 




PRI02 " 


000100 


G 


TIMOUT 


024026 


G 


TlOMSl 


025724 


G 


LIMPCP 


002016 


G 


nANTBL 


022754 


G 


PR103 - 


000140 


G 


TOUT 


002350 


G 


Tions2 


026032 


G 


LIMPTP 


002022 


G 


WON ■ 


000001 


G 


PRI04 - 


000200 


G 


TRAP4 


030656 


G 


T10MS3 


026057 


G 


LIHW 


002224 


G 


MMSG 


026536 


G 


PRI05 - 


000240 


G 


TRP4FG 


002316 


G 


T10MS4 


026134 


G 



PARAnCTCft COOING 
Syabol tabl* 



Til 

TIIEXT 
TllMSl 
T12 

TUEXT 
T12«S1 
T15 

T13£XT 

Tisnsi 

12 
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SEQ lis 



042452 


G 


T2exT 


034736 




T6EXT 


040022 




uAn 


000200 G 


URER6 


025452 


G 


042566 




T3 


034744 


G 


T6.1 


037256 




VECTOR 


031212 G 


URER7 


025534 


G 


026221 


G 


T3EXT 


035354 




T6.2 


040030 




VEC4 • 


000004 G 


URINTO 


027226 


G 


042574 


G 


T4 


035362 


G 


T7 


040702 


G 


URBUF 


002750 G 


WRPRTE 


027252 


G 


042710 




T4EXT 


036102 




T7EXT 


041436 




URDATA 


002342 G 


URl 


023350 


G 


026524 


G 


T5 


036124 


G 


T8 


041444 


J 


URERl 


025250 G 


XIALUA* 


000000 




042716 


G 


T5EXT 


036640 




T8EXT 


042200 




URER2 


025302 G 


XtFALS- 


000040 




045100 




T5.1 


036124 




T9 


042206 


G 


URER3 


025323 G 


XIOFFS- 


000400 




026430 


G 


T5.2 


036652 




T9EXT 


042262 




URER4 


025351 G 


XITRUE- 


000020 




034514 


G 


T6 


037256 


G 


T9FLAG- 




GX 


URER5 


025375 G 









. A8S. 062130 000 
000000 001 
Errors detected: 0 

*•* A«M«tol«r •tatistie* 



(RW.I.GBL.ABS.OVR) 
(RU.Z.LCL.REL.CON) 



Uerk f i 1« rmm&m : 
Uerk f i 1« Mr i t«s : 
Six* of mark fil«: 
Six* of cor* pool: 
Oporating syst**: 



291 
299 

34376 Uord* 
19684 Uord* 



( 135 Pag««) 
C 75 Paoas) 

RSX-lin/PLUS (Und*r VAX/VMS) 



ElapMd tin*: 00:14:50.59 
CZTU2t.tZN.CZTU»/-SP-SVC40ll.rU/ri..CZTU2B 



